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CUPON  OFERTA 
Aproveche  ahora  esta  magnífica 
oportunidad  para  suscribirse 
a  MSX  SOFT 
MAGAZINE. 


Envíe  HOY  MISMO  este  cupón.  SOFT  MAGAZINE 

Inmediatamente  empezará  a  recibir  sus  ejemplares  MSX  SOFT  MAGAZI- 
NE  y  así  durante  I  año  (12  ejemplares). 

El  importe  lo  abonaré:  POR  CHEQUE  □  CONTRA  REEMBOLSO  □ 
GIRO  POSTAL  □ 


ahora  sólo 

6.545  ptas. 

NOMBRE 
DIRECCION 
CIUDAD 
PROVINCIA 
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NOTICIERO 


VA  DE  JOYSTICKS 

SILICA  SHOP,  especialista 
en  equipos  de  juegos  de  or¬ 
denador,  acaba  de  importar 
algunos  joysticks  americanos 
diseñados  para  hacer  los  jue¬ 
gos  más  fáciles  de  usar. 

El  Rapid  Fire  Control  (con¬ 
trol  de  disparo  rápido),  cos¬ 
tará  aproximadamente  una 
2.000  pesetas  y  es  un  adap¬ 
tador  que  se  pone  entre  el 
puerto  de  joystick  y  el  mismo 
joystick.  Con  él,  el  jugador 
añade  esta  facilidad  a  sus 
juegos.  Sólo  puede  usarse 
con  aquel  software  que  esté 
programado  para  permitir 
disparo  rápido. 

También  existen  cables 
alargados  para  joystick.  Uno 
de  ellos  es  de  12  pies  y 
tiene  forma  de  cable  telefó¬ 
nico;  su  precio  oscila  alrede¬ 
dor  de  las  2.000  pesetas, 
mientras  que  el  de  6  pies 
costará  aproximadamente 
unas  1.500  pesetas. 

Asimismo,  los  jugadores 
zurdos  estarán  encantados 
con  el  joystick  South  Paw  y 
el  adaptador  de  joytick  para 
zurdos.  Girando  el  mango  del 
joystick  90  °,  el  botón  de  dis¬ 
paro  se  sitúa  en  el  lado  de¬ 
recho,  para  acomodarse  a 
las  necesidades  de  los  zur¬ 
dos. 

Por  último,  el  «Double 
Play»  permite  jugar  con  un 
joystick  en  un  juego  de  dos 
jugadores  y  consiste  en  un 
cable  en  «y»  que  se  enchufa, 
por  un  lado  a  un  joystick  y 
por  otro  lado  a  ambos  puer¬ 
tos  de  joystick,  lo  que  permi¬ 
te  usar  un  solo  joystick  vía 
dos  puertos. 


OTRO  SISTEMA  YA  DIS¬ 
PONIBLE 

Las  «BEE  CARDS»,  módulos 
de  memoria  del  tamaño  de  una 
tarjeta  de  crédito,  tienen  una 
capacidad  de  256  K  y  yá  están 
a  la  venta  por  parte  de  la  com¬ 
pañía  HUNDSON  SOFT,  por 
£  14,95. 

Habrá  tres  tipos  de  BEE 
CARD.  Cada  una  de  ellas  con¬ 
tendrá  un  tipo  de  memoria  dis¬ 
tinto,  según  los  programas. 

EL  MASK  ROM  se  usa  para 
juegos  de  ordenador,  publicidad 
electrónica  y  programas  para 
promoción  de  ventas. 

Las  «CARDS»  con  EPROM  se 
pueden  usar  para  programas 
como  archivos  médicos,  archi¬ 
vos  de  oficina  y  de  clientes, 
donde  la  información  puede  es¬ 
cribirse  en  memoria. 

Las  «CARDS»  EPROM  contie¬ 
nen  memoria  con  posibilidad  de 
ser  reescrita  y  sirve  básicamen¬ 
te  para  bases  de  datos. 

En  Japón,  las  «BEE  CARDS» 
se  están  usando  en  conjunto 
con  sistemas  computerizados 
para  comprar  video  juegos, 
compras  por  ordenador,  reserva 
de  hoteles  y  hasta  para  bancos 
caseros. 


BUENAS  NOTICIAS  DE 
IMPRESORAS 

RITEMAN  ha  sacado  un 
nuevo  modelo  de  impresora 
F  +  de  punto  matricial  que 
ofrece  impresión  bidireccio- 
nal  de  hasta  105  caracteres 
p.s.,  la  opción  de  96  carac- 
téres  itálicos  ASCII  y  una 
cosa  que  pocas  impresoras 
tienen:  alimentación  frontal 
de  papel,  lo  que  impide  el 
típico  lío  entre  papel  y  ca¬ 
bles. 

Asimismo,  EPSON  ha  ba¬ 
jado  el  precio  RX  1 00  +  y 
FX  80  +  en  £51  y  £102 
respectivamente. 


NUEVO  RATON  PARA 
MSX 


Por  fin  se  ha  desarrollado 
un  ratón  para  MSX. 

WIGMORE  HOUSE  ha  sa¬ 
carlo  el  MS2000,  junto  con 
software  (por  cinta  o  cartu¬ 
cho).  El  ratón  incorpora  una 
bola  de  goma,  lo  que  permite 
que  funcione  suavemente  en 
cualquier  superficie.  Asimis¬ 
mo,  tiene  dos  botones  de 
control. 

El  software  incorpora  las 
formas  standard,  líneas  dis¬ 
continuas,  puntos,  líneas  y 
se  puede  pintar  con  15  co¬ 
lores  primarios.  Además  de 
esto,  también  hay  imágen  es¬ 
pejo,  zoom,  texto,  impresión, 
duplicación  y  pintura  con 
hasta  120  mezclas  de  colo¬ 
res. 

Los  dibujos  pueden  car¬ 
garse  y  grabarse  por  casset¬ 
te. 
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CURSO  BASIC 


Módulos,  Módulos  y  más  Módulos 

Ya  sabes  que  me  llamo  MSX,  y  quiero  explicarte 
este  programa  paso  a  paso,  para  que,  siguiendo 
con  la  explicación  del  número  anterior  veas  lo 
sencillo  que  resulta  programar  en  módulos  o  subru¬ 
tinas. 


La  rama  principal  del  progra¬ 
ma,  ocupa  muy  pocas  instrucciones, 
y  aun  podía  ocupar  mucho  menos, 
si  las  intrucciones  que  van  en  este 
trozo  las  hubiéramos  enviado  a 
otras  subrutinas  con  el  consabido 
gosub. 

En  las  cuatro  primeras  instruccio¬ 
nes,  limpiamos  la  pantalla  para  pre¬ 
parar  una  recepción  de  datos,  luego 
hay  unos  comentarios  que,  uno  nos 
indica  de  que  va  el  programa,  y 
otro  que  dice  lo  que  hace  la  subru¬ 
tina  que  enviamos  desde  la  siguien¬ 
te  instrucción  (40  GOSUB  3000). 

¿Qué  ocurriría  si  nuestro  progra¬ 
ma  no  llegara  a  visualizar  la  prime¬ 
ra  impresión  de  dicha  subrutina? 

Estoy  seguro  que  todos  habéis 
adivinado  que  el  error  estaría  en 
una  instrucción  anterior,  pero  como 
solo  existen  unas  pocas,  sería  faci¬ 
lísimo  detectarlo,  ¿No  es  verdad? 

Pero  continuemos: 

La  instrucción  5  0  nos  pide  que 
pulsemos  una  tecla  (s)  si  queremos 
volver  a  ver  las  instrucciones,  o 
cualquiera  otra  si  no  deseamos  leer¬ 
las  de  nuevo,  esto  se  confirma  en 
la  siguiente  instrucción. 

El  grupo  de  instrucciones  100  a 
150  te  digo  mediante  la  pantalla 
que  vais  a  darme  unos  datos  que 
os  voy  a  pedir,  y  el  primero  de 
ellos  es  naturalmante  el  curso  que 
estáis  estudiando.  (Puedes  introdu¬ 
cir  números  y  letras  como  tercero 
EGB,  etc.). 

Una  vez  introducido  este  dato 
me  voy  a  otra  subrutina... 

El  siguiente  grupo  de  instruccio¬ 
nes  (200  a  280)  simplemente  os 
presenta  en  pantalla  lo  que  va  a 
hacer  la  siguiente  subrutina  de  la 
hablaremos  en  su  momento,  pidién- 
dos  una  tecla  cuando  hayais  acaba¬ 
do  de  leerlo,  para  continuar. 

Después  vamos  a  saltar  de  nuevo 
a  otra  subrutina. 


Os  habréis  dado  cuenta  que  de¬ 
lante  de  cada  gosub  tengo  una  ins¬ 
trucción  REM  de  comentarios,  que 
sirve  al  programador  para  saber 
que  debo  hacer  en  cada  una  de 
las  subrutinas,  sin  necesidad  de  bus¬ 
car  el  número  de  instrucción  y  leer 
el  conjunto  de  ellas. 

Fijaos  que  tengo  una  variable 
inicializada  con  valor  —  1,  os  pre- 
guntarésis  ¿por  que  —  1  y  no  0? 
Tenéis  razón,  también  serviría  con 
valor  cero,  cambiando  entonces  la 
instrucción  4000  a  otra  superior  a 
la  4040,  que  es  donde  se  lee  el 
primer  valor,  correspondiente  a  la 
matriz.  Dimensionamiento  N  $ 
(0),  pero  estoy  seguro  que  en  otros 
muchos  casos  de  encontraréis  la 
imposibilidad  de  cambiar  la  instruc¬ 
ción  de  sumar  1  a  una  variable  a 
un  lugar  que  no  sea  el  comienzo 
de  una  subrutina  o  un  grupo  de 
instrucciones,  y  por  esto  hemos  de¬ 
cidido  hacerlo  así  por  esta  vez, 
para  que  conozcáis  algún  pequeño 
truco  utilizado  en  programación. 

Sigamos  ahora  con  el  programa 
principal: 


Volvemos  a  saltar  a  otra  subru¬ 
tina  (y  otra  vez  con  su  REM  an¬ 
terior  correspondiente). 

Al  retorno  de  esta  subrutina  se 
pregunta  si  la  variable  Z  (número 
de  veces  que  se  ejecuta,  y  por 
tanto  número  de  alumnos  que  apa¬ 
recen  en  p,  Italia),  es  igual  a  la 
otra  variable  C,  que  representa  el 
número  de  alumnos,  y  en  caso  de 
que  ambos  sean  igir  les  hemos  ter¬ 
minado  la  ejecucic  completa  del 
programa,  dándote  la  opción  de 
volver  a  empezar,  si  quieres  repetir 
el  programa  otra  vez;  antes  de  pul¬ 
sar  S,  se  ha  puesto  la  instrucción 
clear  que  limpia  las  variables,  ya 
que  de  no  hacer  esto,  nos  daría 
error  al  volver  a  definir  las  DIM 
(matrices  de  alumnos). 

Si  las  variables  Z  y  C  no  son 
iguales,  entonces  aún  quedan  alum¬ 
nos  para  seguir  imprimiendo  sus 
calificaciones. 

Veamos  a  continuación  las  subru¬ 
tinas  una  por  una. 

La  primera  de  ellas  (3000-3120), 
nos  cuenta  que  es  lo  que  pretende¬ 
mos  obtener  con  este  programa, 
es  decir,  que  tu  debes  digitar  unos 
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5  KEY  OFF 

lf  REM  XXXXX1HHMXXXXXXXXXXXXX  »»»*»» 

19  REM  TITULO  DEL  PROGRAMA 

20  REM  CALIFICACIONES  ESCOLARES 

21  REM  XXXXXXXXXXXXXXXXXXXXXXXXXXXX 

30  REM  VAMOS  A  VISUALIZAR  INSTRUCCIONES 

31  REM  XXXXXXXXXXXXXXXXXXXXXXXXXXE* 

40  GOSUB  3000 

49  LOCATE  1  23 

50  INPUT  "REPETIMOS  INSTRUCCIONES  S/N  ";T* 
60  IF  T*=*S"  GOTO  40 

100  CLS 

110  LOCATE  7,7 

120  PRINT  ■ AHORA  VAS  A  INTRODUCIR  " 

130  PRINT  "LOS  DATOS  QUE  TE  PIDO 

140  INPUTE|,1£n39UE  CURSO  ESTAS  "  5  L* 
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Aprender  puede  ser  divertido,  con  un  ordenador 
PHILIPS  MSX  y  el  lenguaje  de  programación  LOGO. 

Porque  .LOGO  ha  sido  especialmente  desarrollado 
para  permitir  a  los  jóvenes  usuarios,  iniciarse 
rápidamente  en  informática.  Es  increíblemente  fácil  de 
usar,  con  sencillos  comandos  en  el  idioma  “nativo”  del 
usuario. 

Además  el  MSX-LOGO  de  PHILIPS  le  da  acción  con 
color  y  sonido;  lo  que  ayuda  a  generar  y  mantener  su 
atracción  en  el  aprendizaje.  Por  eso  el  PHILIPS  MSX-LOGO 
es  el  favorito  en  todos  los  colegios  y  escuelas  del  mundo. 

Y  aunque  LOGO  es  recreativo,  también  constituye  el 
fundamento  sobre  el  cual  el  usuario  adquirirá  mayor 
destreza  en  la  solución  de  problemas,  y  es  en  definitiva 
el  sólido  y  excelente  cimiento  para  estudios  más 
avanzados. 


ORDENADOR  PHILIPS 
POSEE  FACILIDADES 
EXTRAORDINARIAS  PARA  LAS 
EN  COLOR,  Y  FORMA  LA 
PARA  UN  SISTEMA  PERFECTO  Y 
AMPLIABLE  QUE  CUMPLE  LA  NORMA 
STANDARD  MUNDIAL  MSX. 


Como  el  propio  Dr.  Seymour  Papert,  inventor  del 
LOGO  declaró:  “MSX  y  LOGO  forman  el  matrimonio  más 
ideal  que  podamos  imaginar.  ^Estando  ambos  orientados 

a  gráficos,  el  MSX 
apoya  todo  lo  que 
el  LOGO  ha  de 
ofrecer  en 
cuanto  a 
música  y 
animación  de 
figuras”. 


LA  LECTO- 

GRABADORA  DE 
DATOS  EN  CINTA 
CASSETTE 
CONSTITUYE  EL 
EQUIPO  IDEAL  DE 
BAJO  COSTE 
PARA  EL 

ALMACENAMIENTO  DE 
INFORMACION  -DATOS  Y 
PROGRAMA-  EN  TODOS  LOS 
ORDENADORES  MSX 


Los  ordenadores  PHILIPS  MSX  disponen  de  una  total 
capacidad  gráfica  en  color  y  generación  de  música,  y  se 
integran  de  forma  ideal  con  las  facilidades  educativas  del  LOGO. 

El  MSX-LOGO  de  PHILIPS  es  el  único  que  puede  presentar 
hasta  30  tortugas,  y  cada  una  adoptando  una  figura  entre 
60  definibles  por  el  usuario  mediante  el  editor  incorporado; 
admite  hasta  16  colores,  puede  emitir  por  tres  canales 
musicales  y  otro  más  para  efectos  sonoros,  el  movimiento  de 
figuras  es  autónomo,  detecta  choques  de  ‘tortugas’  y  otros 
eventos,  realiza  un  completo  tratamiento  de  LISTAS  y 
propiedades. 

PHILIPS  ofrece  lo  que  el  poderoso  mundo  del 
Stándard  MSX  merece:  lo  mejor.  Y  esto  se 
concreta  en  sus  equipos,  en  sus  programas,  y 
en  el  valor  del  dinero  desembolsado.  PHILIPS 
integra. 


PHILIPS 


Servicio  de  Información  al 
simpatizante  y  usuario 

TáL  (f>l)  410  21  62 


CURSO  BASIC 


nombres  y  que  MSX  va  a  poner 
unas  notas  en  unas  asignaturas  de¬ 
terminadas. 

La  siguiente  subrutina,  que  co¬ 
mienza  en  la  instrucción  3300,  te 
va  a  pedir  el  número  de  nombres 
de  los  amigos  que  quieres  introdu¬ 
cir  y  almaceno  el  dato  en  la  variable 
C. 

Después  de  almacenar  el  dato, 
veras  que  se  le  resta  uno,  pensaras 
que  hubiera  sido  más  fácil  teclear 
una  unidad  menos  ¿verdad?  pues 
en  este  caso  no  llevas  razón,  vea¬ 
mos:  ¿Cuántos  campos  se  dimen- 
sionan  con  DIM  a  (5)  ¡Cuidado! 

Si  contestaste  6  has  acertado,  ya 
que  la  primera  dimensión  es  a  (0) 
¿a  que  así  si  lo  entiendes?  ¡vale!, 
pues  entonces  adelante.  Decíamos 
que  restábamos  uno  a  la  variable, 
para  posteriormente  preparar  una 
matriz  (o  una  serie  de  campos) 
con  capacidad  para  los  nombres 
que  tu  has  decidido  almacenar  en 
memoria. 

Vas  a  teclear  el  nombre  del  pri¬ 
mero  de  tus  amigos,  y  a  continua¬ 
ción  el  bucle  FOR-NEXT  de  las 
instrucciones  siguientes  se  va  a  re¬ 
petir  tantas  veces  como  nombres 
vayas  a  introducir  (menos  el  prime¬ 
ro  que  hicimos  referencia)  y  en 
cada  una  de  las  vueltas,  Next  au¬ 
mentaba  en  1  la  variable  B,  de 
modo  que  en  cada  INPUT  los  datos 
entran  en  un  campo  distinto  de  la 
matriz  previamente  dimensionada. 

Una  vez  acabado  esto  volvemos 
al  programa  principal  mediante 
otro  RETURN  ¿seguimos? 

En  la  subrutina  que  comienza 
en  la  instrucción  4000  limpiamos 
la  pantalla  para  recepción  de  datos 
y  visualizamos  en  pantalla  algunos 
títulos  para  que  resulten  más  acla¬ 
ratorios  de  los  datos  impresos  a 
continuación,  como  el  alumno  y  el 
curso  que  tu  elegiste,  y  des  pués 
un  número  determinado  de  asigna¬ 
turas  que  en  este  caso  son  6  que 
iremos  a  leer  a  otras  subrutina, 
pero  enviada  desde  la  misma  en 
que  estamos,  en  este  momento  en 
la  pila  de  «saltos»  el  ordenador 
lleva  los  correspondientes  a  dos 
subprogramas,  y  podráis  seguir  sal- 
tanto  a  una  tercera,  cuarta,  etc., 
sin  que  tu  MSX  se  equivoque  al 
ejecutar  cada  RETURN. 

A  la  vuelta  de  leer  las  asignaturas 
definidas  en  la  Data  (que  tu  puedes 
cambiar  a  tu  gusto)  volvemos  a 
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145  REM  XXMKXKKKMMXXXXXXXXXKXKXK^# 

150  REM  VOY  A  INTRODUCIR  DATOS 

155  REM  XXXXXXXXXXXXXXXXXXXXXXXX**** 

160  GOSUB  3300 

Íl0  PRINTE-7,YA  TENGO  LOS  NOMBRES" 

220  PRINT  "DE  TUS  AMIGOS  EN  MI  MEMORIA" 

230  PRINT  "AHORA,  VAMOS  A  SACARLOS" 

240  PRINT  "POR  ESTA  PANTALLA." 

245  PRINT  "CON  UN  ENCABEZAMIENTO  PARA  QUE 
250  PRINT  "SEPAS  LO  QUE  ES  CADA  DATO,  Y 
255  PRINT  "ADEMAS  YO  LES  VOY  A  PONER  LAS" 

258  PRINT  "NOTAS  QUE  LES  CORRESPONDEN  PERO..." 
260  PRINT  "LO  HARE  POR  SORTEO!." 

270  PRINTE"PÓlIa  TECLA  PARA  CONTINUAR  " 

275  T*=INKEY* 

280  IF  T*  »""  GOTO  275 

290  REM  XXXXXXXXXXXXXXXXXXj(XXXXXX-^ 

295  REM  VOY  A  IMPRIMIR  CABECERAS 

296  REM  XXXXXXXXXXXXXXXXXXXXXXXXX- X-** 

298  DIM  A*<5> 

299  Z=-i 

300  GOSUB  4000 

309  REM  XXXXXXXXXXXXXXXXXXXXXXXX*»** 

310  REM  VOY  A  IMPRIMIR  NOTAS 

311  REM  XXXXXXXXXXXXXXXX»*»XXXXXXX*» 

320  GOSUB  4500 

330  IF  Z=C  THEN  GOTO  500 

339  LOCATE  1  24 

340  PRINT  "¿ULSA  TECLA  OTRO  ALUMNO  " 

345  T*=INKEY* 

350  IF  T*=""  GOTO  345 
360  GOTO  300 

500  PRINT  ■ PULSA  TECLA  * 

501  T*=INKEY* 

502  IF  T*=""  THEN  GOTO  501 

503  CLS 

510  REM  HEMOS  TERMINADO  TODAS  LAS  NOTAS 
520  LOCATE  7  7 

530  PRINT  ■  ('A  HEMOS  TERMINADO  CON  TODAS* 

-  -  LAS  NOTAS  DE  TUS  AMIGOS  * 

Y  COMO  VES  NINGUNO  DE  VOSOTROS" 

oto  r  .  HABEIS  SUSPENDIDO."  _ _ _ 

547  PRINT  "OJALA  QUE  SEA  ASI  DE  VERDAD" 

560  PRINT  "AHORA  SI  QUIERES,  EMPEZAMOS  " _ 

570  PRINT  "OTRA  VEZ  CON  OTRO  GRUPO  DE  ALUMNOS." 
575  CLEAR  5000 

580  INPUT  "PÓLSA  PARA  SEGUIR  S/N  “ 5 T* 

590  IF  T*="S"  OR  T*="s"  GOTO  50 
600  PND 

3000  REM  X  X  X X»*»-XX  X  M  X  »**»  X  X  X  X  XX*»*** 

3001  REM  INSTRUCCIONES 

3002  REM  X  X  X  X  X  X  *X  X  X  X  X  X  X  X  X  X  X  X  X  X  X  X  X  X*» 

3005  CLS 

3010  LOCATE  10,3 

3015  PRINT  "HOLA  AMIGOS" 

Í0I5  PRINTE"VÉ:REMOS  UN  PROGRAMA  PARA  VER  " 

3030  PRINT-EN  PANTALLA  LA  CALIFICACION" 

3040  PRINT "OBTEN IDA  POR  CADA  UNO  DE  TUS" 

3050  PRINT "AMIGOS  EN  EL  COLEGIO" 

3060  PRINT: PRINT  "TU  SERAS  EL  ENCARGADO  DE 
3070  PRINT  "INTRODUCIR  SUS  NOMBRES" 

3080  PRINT  "PERO  EL  ORDENADOR  SERA  " 

3090  PRINT  "QUIEN  LOS  CALIFIQUE." 

I 100  PRINTE"p6l1a  TECLA  PARA  CONTINUAR  " 

3105  T*=INKEY* 

3110  IF  T*  =""  GOTO  3105 

3300  REM*  XXX X XXX  X  XXXXXXXXXXXX-XXXXXX* 

3301  REM  INTRODUCCION  DE  NOMBRES 

3302  REM  XXXXXXXXXXXXXXXXXXXXXXXX»*» 

i§05  INPUTE"CÓANTOS  NOMBRES  <MAS  DE  UNO)";C 
3310  C=C-1 
3320  DIM  N*(C> 


540  PRINT 

545  PRINT 

546  PRINT 
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3322  INPUT  "DAME  UN  NOMBRE  -;N*<0> 

3330  FOR  B=1  TO  C 
3335  CLS 

QQQQ  I  nrATP  1  9Q 

3340  INPUT  "DÁME  OTRO  NOMBRE  ■ y  N* ( B ) 

3360  NEXT  B 
3370  CLS 
3380  RETURN 

4000  REM  *************************** 

4001  REM  SUBRUTINA  DE  EDICION 

4002  REM  ** tt tt ***** *  X ********* ttJHHHHHÍ 
4005  CLS 

4008  Z=Z+1 
4010  LOCATE  4.2 

4020  PRINT  -CALIFICACIONES  ESCOLARES  - 

4030  LOCATE  4.5 

4040  PRINT  -ALUMNO:  ■  ;N*<Z) 

4050  LOCATE  4,7 

4060  PRINT  "CURSO:  ■  >  L$» 

4070  LOCATE  4.9 

4075  PRINT  -ASIGNATURAS:* 

4080  rem  ********* x x x x x 

4081  REM  VAMOS  A  SALTAR 

4082  REM  DESDE  ESTA  SUBRUTINA 

4083  REM  A  OTRA  PARA  LEER  ASIGNATURAS 

4084  REM  *************************** 

4090  GOSUB  7000 

4094  REM  *********  ************* ***** 

4095  REM  VAMOS  A  LEER  LAS  NOTAS 

4096  REM  ********  **************  ***  ■** 

4100  GOSUB  7200 

4200  M=K 

4210  GOSUB  7200 

4220  N=K 

4230  GOSUB  7200 

4240  0=K 

4250  GOSUB  7200 

4260  P=K 

4270  GOSUB  7200 

4?pa  q~l/ 

4290  GOSUB  7200 
4300  R=K 
4400  RETURN 

4500  REM  **  *******  *  *  *  *****  X  *******  ** 

4505  REM  EDICION  DE  NOTAS 

4510  REM  *********  X  ***  *  *  * *********** 

4520  LOCATE  9,11 

4550  PRINT  A*(0>;-:  -JM 

4600  LOCATE  9,13 

4650  PRINT  A* ( 1 ) ; ■ :  -;N 

4700  LOCATE  9,15 

4750  PRINT  A*<2);-:  -;0 

4800  LOCATE  9,17 

4850  print  A*<3>;-:  -;P 

4900  LOCATE  9,19 

4950  PRINT  as<4);-:  -;Q 

5000  LOCATE  9,21 

3050  PRINT  A*<5>;*:  -JR 

5100  RETURN 

7000  REM  ******************** ******* 

7005  REM  SUBRUTINA  LECTURA 

7010  REM  VIENE  DE  SUBRUTINA 

7011  REM  EDICION  DE  CABECERAS 

7015  REM  ******  ***  *  *  *  *  *****  *  *  *  ****** 

7017  RESTORE  9000 
7030  FOR  B=0  TO  5 
7040  READ  A*<B> 

7050  NEXT  B 
7060  RETURN 

7200  REM  ********* ****************** 

7205  REM  LECTURA  DE  NOTAS 

7206  REM  ********  ********** ********* 

7208  RESTORE  9100 

7210  E= I NT ( RND ( 1 ) *20 ) + 1 
7220  FOR  B=  i  TO  E 
7225  READ  K 
7230  NEXT  B 
7250  RETURN 

9000  DATA  MATEMATICAS, LENGUAJE, NATURALEZA, 
9100  DATA  5, 6, 7, 8, 9, 5, 6, 7, 8, 9, 5, 6, 7, 8, 9, 5, 


otra  nueva  subrutina  para  efectuar 
otra  lectura,  pero  esta  vez  va  a 
extraer  un  dato  aleatorio  cada  vez 
que  vaya  a  su  busca  en  la  data 
de  notas. 

Al  igual  que  en  la  subrutina  an¬ 
terior,  la  primera  instrucción  es  un 
restore  con  un  número  detrás  ¿Que 
significa  esto?  Que  apuntamos  al 
número  de  instrucción  en  la  que 
están  referenciados  los  datos  me¬ 
diante  la  sentencia  data.  Pero  veréis 
que  ocurriría  si  no  pusiéramos  res¬ 
tore:  cada  vez  que  leemos  una  dato 
(p.  ej.  matemáticas)  los  ordenadores 
res  tenemos  como  un  puntero  que 
marcaría  el  dato  siguiente,  ahora 
lenguaje,  entonces  «correría»  el 
puntero  hasta  naturaleza,  y  así  has¬ 
ta  finalizar  con  el  último  (leeríamos 
todos  los  datos  existentes  en  la 
data,  aquí  el  último  sería  un  9), 
si  ahora  intentamos  efectuar  una 
READ  (lectura  de  los  data)  no  ten¬ 
dría  ningún  dato  para  leer  y  obten¬ 
dríamos  un  mensaje  de  error.  Bién, 
pues  si  queremos  leer  notas,  haría¬ 
mos  restore  9100  que  lo  que  hace 
es  «restaurar»  el  puntero  que  he¬ 
mos  mencionado  al  inicio  de  la 
data  correspondiente  a  la  línea  es¬ 
pecificada,  ¿comprendido?  estu¬ 
pendo,  ¡adelante!  cada  vez  que  va¬ 
mos  a  leer  una  nota  e  imprimirla 
utilizo  la  función  RND  que  elige 
un  número  aleatorio  entre  0  y  1 
pero  que  al  multiplicarlo  por  20, 
elegir  el  número  entero  y  sumar 
1,  el  número  estará  entre  1  y  20, 
de  esta  forma,  vamos  a  elegir  la 
nota  correspondiente  entre  20  ele¬ 
mentos  de  la  data  9100,  uno  de 
ellos  sera  el  elegido  para  una  asig¬ 
natura,  por  eso  el  dato  K  se  va 
poniendo  en  tantas  variables  como 
asignaturas  (6  en  este  caso,  pero 
puedes  tratar  de  ampliarlo,  varian¬ 
do  las  líneas  de  impresión  de  la 
subrutina  que  comienza  en  la  ins¬ 
trucción  4500)  M,  N,  O,  P,  Q,  y 
R  para  su  posterior  impresión. 

Buenos  amigos,  en  la  próxima 
ocasión  seguiremos  comentando 
otros  ejemplos  como  creación  de 
un  fichero  en  cinta  de  nombres  y 
teléfonos  de  vuestros  amigos,  es 
decir  llevar  vuestra  agenda  mecani¬ 
zada  ¿que  os  parece? 
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Tu  alunizaje  comienza  a  70.000 
m  de  distancia  de  la  luna,  tu 
velocidad  en  este  momento  es  de 
3.600  km/h,  tus  tanques  contienen 
16.000  1  de  combustible  .  Para 
alunizar  debes  ir  calculando  el 
consumo  en  litros  por  segundo 
de  tus  retropropulsores,  la  máxi¬ 
ma  potencia  de  estos  es  de  500 
1/s,  para  ir  reduciendo  tu  veloci¬ 
dad.  Tu  panel  de  abordo  te  da 
tu  situación  cada  10  s  y  la  alma¬ 
cena  para  que  te  sirva  de  referén- 
cia. 

Debes  procurar  llegar  a  la  luna 
con  la  menor  velocidad  posible 
de  lo  contrario  te  estrellarás. 
También  debes  cuidar  el  ahorro 
de  tu  combustible  ya  que  si  este 
se  te  terminara  a  determinada  al¬ 
tura,  iría  sumando  a  tu  velocidad 
en  ese  instante  la  que  te  diese  la 
fuerza  de  la  gravedad  de  la  luna 
hasta  tu  llegada  al  suelo. 

Si  en  tu  panel  aparece  un  valor 
de  velocidad  negativo  es  que  has 
frenado  demasiado  y  te  alejas  pe¬ 
ligrosamente  de  la  superficie  lu¬ 
nar. 


1£J  REM  OOOOOOOOOOOOOOOOOOOOOOOOOO . 

20  REM  000  PROGRAMA  * ALUNIZAR"  000 
30  REM  000  LUIS  SANGUINO  (C)  MONSER  000 
40  REM  OOOOOOOOOOOOOOOOOOOOOOOOOO 

DCM 

60  REM  OOOOOOOOOOOOOOOOOOOOOOOOOO 
"?0  REM  00  TITULO  Y  DATOS  INICIALES  00 
80  REM  OOOOOOOOOOOOOOOOOOOOOOOOOO 

90  COLOR  5, 14, 13 
100  SCREEN  3 
110  open-grp: *AS#1 
120  PSET ( 10, 30) .14 
130  PRINT#1, “ALUNIZAR" 

140  FOR  1=1  TO  2000 

160  DIMTF(30) :DIM  A(30):DIM  C<30):DIM  V<30>:DIM  R<30) 

170  KEY  OFF 
(00  CLS 

190  REM  OOOOOOOOOOOOOOOOOOCOÜOOOO 
200  REM  00  DATOS  Y  POSICINAMIENTOS  00 

220  rIm  °°coooobooooobooooooooooooo 

240  DEFEFNAm=INT(X*100>  /100 

250  F1=0: A=70: V=1 : F2=32500: F3=16500 

260  G=lE-03:  Z=1 . 8 

280  COLOR  1*14:  LOCATE  0,0:  -TIEMP  ALTURA V|k2CiP$?/ÍÍg?UST  CONSUMO" 

290  LOCATE  ¿>,l:  PRINT"  SEG  METROS  KM/H  LITROo  LIT/SEC 
300  IF  A=70  GOTO  380 
310  U=U+1 

320  IF  J  >8  THEN  B=B+1 

rnn  J  — g  TO  (J“  1 

340  PRINT : PRINT  TAB <0) 5 F < J) ! TA3 <5) 5  A < J> í 
350  PRINT  TAB(13) ;V<J) »TAB(22) ;RIJ) . 

360  PRINT  TAB (31) > "C=" *  C ( J ) 

380  PRINT'PRINT  TAB C0) i INT (F1+. 5) 5 TAB (5) ! INT < A*1000> ! TAB ( 13) 5 FNA < V*3600> ; TAB <22> 

390AÁEU )  =  I  NT  ( A* 1000 )  :  F  ( U)  =INT  (F1  +  .5)  :V(U)  =FNA  ( V*-3600 ) 

400  R (U) =FNA (F2-F3) 

410  PRINTTAB(31) 5 "C=M; 

420  LINE  INPUT  C*  : C=VAL (C*) 

430  REM  00000000000000000000 

440  REM  0000  LIMITES  DE  CONSUMO  0000 
450  REM  00000000000000000000 


programas  de  productividad, PHILIPS  tiene  mucho 
más  que  ofertar  en  el  mundo  de  la  informática: 
potentes  lenguajes  de  programación  como  el 
Pascal,  o  como  el  inigualable  y  universalmente 
conocido  MSX-LOGO,  además  de  sus  programas 
educativo-recreativos. 

Los  programas  PHILIPS  están  respaldados 
por  su  gama  de  periféricos,  incluyendo 
impresoras  de  calidad  para  correspondencia, 
unidades  de  disco  de  alta  velocidad  de 
transferencia  y  gran  capacidad  de 
almacenamiento,  monitores  monocromo  y  de 
color,  cartuchos  de  interface  serie,  y  muchos  más. 

PHILIPS  ofrece  lo  que  el  poderoso  mundo 
del  standard  MSX  merece:  lo  mejor.  Y  esto 
se  concreta  en  sus  equipos,  en  sus 
programas,  y  en  el  valor  del  dinero 
desembolsado.  PHILIPS  integra. 


PHILIPS 


Disfrute  de  las  tareas  de  cada  día,  con  un  ordenador 
PHILIPS  MSX  y  un  programa  de  productividad 


LA  NUEVA  IMPRESORA  DE  MATRIZ 
PARA  CORRESPONDENCIA  PHILIPS  VW0030 
ES  TOTALMENTE  VERSATIL  CON  AMPLIA  SELECCION 
DE  TAMAÑOS,  ESTILOS  Y  REALCES  EN  LA  ESCRITURA.  EN 
HOJAS  SUELTAS  O  PAPEL  CONTINUO. 


Servicio  de  Información  al 
simpatizante  y  usuario 


Un  ordenador  PHILIPS  MSX  hará  que 
muchas  de  las  gestiones  cotidianas  sean  más 
llevaderas  y  más  productivas.  Como  la 
preparación  de  la  correspondencia,  el  análisis 
de  informes,  el  mantenimiento  de  los  ficheros  de 
clientes  y  proveedores,  la  confección  de 
presupuestos,  la  emisión  de  facturas  y  recibos,  y 
en  suma,  la  administración  de  pequeñas 
industrias  y  negocios. 

El  amplio  surtido  de  programas  MSX 
orientados  hacia  la  gestión,  son  las  soluciones 
que  ahorran  tiempo,  esfuerzo  y  evitan  errores  en 
estos  trabajos  y  muchos  similares.  La  versión 
única  de  PHILIPS  para  el  sistema  operativo  en 

disquette  MSX-DOS,  con  su  “auxiliar  de 
usuario"  hace  más  cómodo  su  trabajo 
ofreciendo  la  “selección  por  menú” 
de  las  operaciones  a  realizar  y 
“páginas  informativas”  de  ayuda 
al  usuario. 

Además  de  esta 
enorme  variedad  de 


LA  UNIDAD  DE  DISCO  DE 
ACCESO  DIRECTO 
VY0010/1 1  CON 
DISKETTES  DE  3.5"  UNE 
A  SU  GRAN 
CAPACIDAD  DE 
ALMACENAMIENTO 
UNA  VELOCIDAD  DE 
TRANSFERENCIA  DE 
250  KBITS  POR 
SEGUNDO. 
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470  IF  C>500HTHEN  PRINT: PRINT"000  MAXIMA  POTENCIA=  500  LTRS/SEG  000" : PRINT: GOTO 
410 

480  C(U)=C 
490  T=10 

500  IF  C=0  THEN  510 
510  IF  F2-F3-lE-03<0  THEN  660 
520  IF  T-lE-03<0  THEN  GOTO  270 
530  S=T 

540  IF  F3+S*C-F2<=0  THEN  560 

550  S=  < F2-F3 ) /C 

560  60SUB  1140 

570  IF  F4<=0  THEN  970 

580  IF  V<=0  THEN  600 

590  IF  F5<0  THEN  1020 

600  GOSUB  1090 

610  GOTO  510 

620  REM  00000000000000000000000 

630  REM  000  CONDICONES  DE  LLEGADA  000 
640  REM  000  A  LA  LUNA  000 

650  REM  00000000000000000000000 

660  CLS : LOC ATE  0 1 10: PRI NT " 000000  FIN  DEL  COMBUSTIBLE  A  LOS " ; FNA  < F 1 ) 5 " SEG  DEL  COM 
IENZO  DEL  ALUNIZAJE  Y  A" ; INT ( A*1000) 5 "METROS  DE  LA  SUPERFICIE  LUNAR  nnnnnn* 

670  FOR  1=1  TO  3500: NEXT  I : A=0 
680  S=(-V+SQR(V*V+2*A*G) ) /G 
690  V=V+G*S 
700  F1=F1+S 
710  GOSUB  1220 

720  CLS: LOCATE  0, 10: : PRINT"000  SOBRE  LA  LUNA  A  LOS  " ; FNA <F1 ) 5 "SEG  000* 

730  W=3600*V 

740  PR I NT : PR I NT " 000  VELOCIDAD  DE  IMPACT0=" 5 INT < W ) ; "KM/H  000" _ 

750  PRINT:  PRINT " 000  RESERVA  DE  COMBUST. =* 5 FNA (F2-F3) ; "LIT. 000" 

760  IF  W-5>0  THEN  790 

770  PRINT:  PRINT-0000  TU  ALUNIZAJE  HA  SIDO  PERFECTO  0000" 

780  GOTO  890 

790  IF  W-20>0  THEN  820 

800  PRINT: PRINT"0000  TU  ALUNIZAJE  NO  HA  ESTADO  MAL  0000" 

810  GOTO  890 

820  IF  W-55 >0  THEN  850 

830  PRINT: PRINT *000  HAS  REALIZADO  UN  MAL  ATERRIZAJE  000’ 

840  GOTO  890 

Q60  PRINT?PR?NT^OOOO^TE  HAS  CARGADO  LA  NAVE  BESTIA  0000" 

§80  PRINT?PRINT-0000  TE  HAS  ESTRELLADO  CREANDO  UN  NUEVO  CRATER  LUNAR  DE  "FNA ( W*. 
15>5 "METROS  0000" 

890  PRINT: PRINT"  00000  LO  INTENTAS  DE  NUEVO  S/N  00000" 

900  A*=INKEY* 

910  IF  A*="S"OR  A$="s"  THEN  CLEAR: GOTO  160 
920  IF  A*="n-OR  A$="N"  THEN  CLS: END 
930  GOTO  900 

940  REM  0000000000000000000000 

950  REM  0000  ECUACIONES  FISICAS  0000 
960  REM  0000000000000000000000 

970  IF  S-5E-03<0  THEN  710 
980  S=2*A/ <V+SQR<V*V+2*A*(G-Z#C/F2) ) ) 

990  GOSUB  1140 

1000  GOSUB  1090 

1010  GOTO  970 

1020  W=< i-F2*G/ <C*Z> ) /2 

1030  S=F2*V/ (Z*C*(W+SQR(W*W+V/Z) ) ) +.05 

1040  GOSUB  1140 

1050  IF  F4<  =0  THEN  970 

1060  GOSUB  1090 

1070  IF  F5>=0  THEN  510 

1080  IF  V<=0  THEN  510  EL SE  GOTO  1020 

1090  F1=F1+S 

1100  T=T-S 

1110  F2=F2-S4C 

1120  A=F4:  V=F5 

1130  RETURN 

1140  0=S*C/F2 

1150  IF  Q>0  AND  Q*< 3.  4000 1E -08  THEN  Q=3- 40001E-08 
1160  F5=V+G*S+Z*(~Q-QA2/2-Q>‘3/3-Q"k4/4-Q^5/5) 

1 170  F4=A-G*S^2/2-V*S+Z*S*<Q/2+6r2/6+6r3/12+6r4/20+Gr5/30) 

1180  RETURN 

1190  REM  00000000000000 

1200  REM  000000  SCANNER  000000 

1210  REM  00000000000000 

1220  IF  A< >70  THEN  1310 

1230  FOR  H=1  TO  16 

1240  READ  P* 

1250  S$=SS  +  CHR*<VALCkB"*P*)  ) 

1260  NEXT  H 
1270  FOR  M=i  TO  7 
1280  READ  B* 

1290  U$=U*+CHR*¡<VAL<"kB"+B$)  ) 
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1300  NEXT  M 

1310  COLOR  10,1,9 

1320  CLS:  SCREEN  2,2.9 

1 330  REM  OOOOOOOOOOOOOOO 

1340  REM  000000  ESTRELLAS  000000 

1350  REM  OOOOOOOOOOOOOOO 

1360  N=RND (-TIME) 

1370  FOR  L=1  TO  250  STEP  4 
1380  R=INT (RND  <1>*190) 

1390  PSET  (L, R) , 10 
1400  NEXT 

1410  REM  000000000000000000000 

1420  REM  000  LA  LUNA  Y  LA  TIERRA  000 
1430  REM  000000000000000000000 

1440  IF  A<  =0  THEM  A=lE-06 

1450  X=(-30+ (220/ (2.5*A> ) ) : Y=180- < 2*A>  +  ( 125* (2. 35/A) ) 
1460  E=50+  <260/ A) 

1470  IF  E >440  THEN  E=472 
1480  IF  X>=127  THEN  X=127 
1490  IF  Y >625  THEN  Y=650 
1500  XI=A+150 

1510  YI=INT (LOG ( A+ . 6) *35) +20 
1520  CIRCLE (XI, YI) ,15,7 
1530  PAINT  <XI , YI ) ,7 
1540  PSET (XI-6.YI-4) ,8 
1550  DRAWE1U1E1U1E1R3E2R2F2" 

1560  PSET (XI-ó.YI+6) ,8 
1570  DRAW " F2R 1 F2R2E3U1 E 1 R2 “ 

1580  PSET(XI-9, YI+7) , 14 

1 590  DR A W ‘ U2E 1 U2R2E3U4E 1 R2U2R3D2G5L2D3 “ 

1600  CIRCLE (X, Y) ,E, 15 

1610  IF  Y>192  THtN  Yl=191  ELSE  Y1=Y 

1620  IF  X<0  THEN  X1=0  ELSE  X1=X 

1630  PAINT (XI, Yl> , 15 

1640  REM  00000000000000000 

1650  REM  00000  LA  NAVE  00000 

1660  REM  00000000000000000 

1670  SPRITE*(1)=S* 

1630  Y2=INT ( 145- (LOG ( A+ . 6) *34) ) 

1690  PUT  SPRITE  1 , ( ( A*2> +90, Y2) , 15, 1 

1700  DATA  00010000 

1710  DATA  00010000 

1720  DATA  00010000 

1730  DATA  00111000 

1740  DATA  00111000 

1750  DATA  01101100 

1760  DATA  11101110 

1770  DATA  11000110 

1780  DATA  01101100 

1790  DATA  01111100 

1300  DATA  00111000 

1810  DATA  00111000 

1820  DATA  00111000 

1830  DATA  01101100 

1840  DATA  11000110 

1850  DATA  10000010 

1860  IF  A<  =lE-06  AND  FNA ( V*3600) >85  THEN  2060 
1870  IF  C=0  GOTO  1980 
1880  SPRITE*(2)=U* 

1890  PUT  SPRITE  2, ( (A*2) +90, 16+Y2) ,9,2 

1900  DATA  00010000 

1910  DATA  00000000 

1920  DATA  00101000 

1930  DATA  00000000 

1940  DATA  01010100 

1950  DATA  00000000 

1960  DATA  10101010 

1970  PLAY  ■T80O8L2B* 

1980  FOR  1=1  TO  700: NEXT  I 
1990  REM  000000000000000000 

2000  REM  00000  REGRESO  AL  PANEL  00000 
2010  REM  000000000000000000 

2020  COLOR  1,14: SCREEN  0:  RETURN 

2030  REM  0000000000000000000000 

2040  REM  000  EXPLOSION  DE  IMPACTO  000 
2050  REM  0000000000000000000000 

2060  PLAY  *T170M1O1 V15L1C" , "M101V15L2E  ,  T190M1O1 V15L1D 

2070  FOR  1=1  TO  16  STEP  2 

2080  CIRCLE (A*2+92, 176) , I, 11 

2090  CIRCLE (A*2+92, 177) ,1,9 

2100  IF  A<=lE-06  THEN  Y2=Y2+I 

2110  SPRITE*(1)=S* 

2120  PUT  SPRITE  1 , ( ( A*2) +90, Y2) , 15, 1 
2130  NEXT  I 

2140  CIRCLE (A*2+92, 176) . 17, 1 
2150  PAINT (A*2+92, 176) , 1 
2160  GOTO  1980 


UNTAS 


Panasonic  MSX 


Compatible  con  sus  deseos. 


Más  útil,  para  que  los  niños  Guay !...  Para  que  todos 
aprendan.  jueguen. 


Porque  gracias  al  sistema  operativo 
standard  MSX,  desarrollado  por  Mi¬ 
crosoft  y  adoptado  por  los  mayores 
fabricantes  mundiales  de  material  in¬ 
formático,  el  ordenador  Panasonic 
CF  2700  admite  todos  los  programas 
de  software  MSX  de  cualquier  marca. 
Esto  significa  más  información  acce¬ 
sible.  Más  ayuda  para  el  estudio. 
Además,  su  capacidad  de  memoria 
RAM,  64KB,  permite  operar  con  el 
más  complejo  software  MSX,  sin 
unidades  de  memoria  extra. 


aqiqtfmda  TFPNir  a  Central  Servicio  Técnico: 
FNTOOAfÍpaSa  Avila,  1 20 Telf  30085  01 

EN  TODA  ESPAÑA  0801 8  Barcelona 

| 

F2ED 

1  1 

l  jo 

Con  el  ordenador  doméstico  Pana¬ 
sonic  CF  2700,  usted  tiene  la  llave  del 
más  moderno  y  variado  stock  de 
video-juegos,  para  divertir  y  apasio¬ 
nar  a  toda  la  familia.  El  sistema  MSX 
le  ofrece  cada  día  nuevo  software 
en  este  campo  del  entretenimiento 
doméstico. 

Moderno  para  que  papá 
trabaje. 

El  ordenador  doméstico  Panasonic 
CF  2700  es  el  más  moderno  punto  de 
partida  para  la  extensión  de  los  usos  y 


□ 


TV  o  Grabador  CF-2700 

Monitor  TV  de  datos 


Cartucho  Lectora 

Interface  para 

para  Ploppy  Disc 

Floppy  Disc 


posibilidades  de  la  informática  en  el 
hogar,  por  su  red  de  periféricos:  op¬ 
ción  lector  de  discos,  impresora, 
plotter,  etc.  El  ordenador  Panasonic 
CF  2700  es  una  herramienta  de  traba¬ 
jo  en  la  que  puede  operar  cualquier 
profesional,  con  conexión  directa  a 
monitor  o  televisión,  posibilidad  de 
realizar  gráficos  en  16  colores  y  músi¬ 
ca  en  8  octavas  y  3  tonos. 

Elegante,  para  que  a 
mamá  le  guste. 

El  diseño  del  nuevo  Panasonic  CF 
2700  ha  sido  muy  cuidado,  haciéndo¬ 
lo  bello  y  atractivo,  acorde  a  la  estéti¬ 
ca  actual.  Teclado  en  gris  y  negro. 
Cursor  de  control  de  gran  tamaño  en 
forma  de  diamante.  Teclas  de  dise¬ 
ño  funcional.  Y  unas  dimensiones  y 
una  ligereza  que  lo  hacen  realmente 
portátil. 


ORDENADORES  DOMESTICOS  MSX 

Panasonic 


El  futuro  en  el  hogar. 

Panasonic  y  Technics  son  marcas  de  Panasonic  España ,  S.A. 


PROGRAMAS 


10  REM  LAVA 
20  REM  POR  M. BERROCAL 
30  REM  JUEGO  MS 

35  MUÍ— " V603DAGF#E04D03AGF#E04D03AGF#GE * 

40  PLAY"T220;XMUí;XMUí;XMU$; “ 

45  CLEAR2000 

55  NV=5: M=ó: N=0: C=0: Xl=l20 
60  z=100: T=i00 
65  INTERVAL  ON 
70  SPRITE  ON 

75  GOSUB1800 

76  sound7.248:play,,T200;xmuí;xmuí;  ü 
80  GOSUB2000 

90  SCREEN2, 2,0: COLORIS, 1, l:CLS 
100  GOSUB2500 
110  L=32:GOSUB3000 
120  SPRITEí <0)=SPÍ 
130  L=32: GOSUB3000 
140  FORJ=i  T04 
150  SPRITEÍ ( J)=SPÍ 
160  NEXT  J 
165  MEÍ=-03AG- 
170  L=8: GOSUB3000 
180  SPRITE* <5>=SPÍ 
190  X=120.*Y=10 
200  u=240: V=20:TIME=0 
210  L=32: GOSUB3000 
220  SPRITE* (6)=SPÍ 
230  ON  INTER VAL=250  GOSUB1500 
240  ON  SPRITE  GOSUB500 
250  D=STICK(1) :SW=0 

255  S%=0: I FNV=0THEN 1 600 

256  IF  Xl<10  THEN1600 

260  IF  DO0  THEN  265  ELSE310 

265  IF  D=1  THEN  X=X: Y=Y-M 

266  IF  D=3  THEN  X=X+M: Y=Y 

267  IF  D=5  THEN  X=X:Y=Y+M 

263  IF  D=7  THEN  X=X-M: Y=Y 

300  IF  PU< 200  AND  Y> 145  THEN  Y=Y- 100: SOUND0, 50: SÜUND1 , 0: SOUNDS, 15: S0UND7, 246: FQR 
J= 1  T03 1 : S0UND6 , J : NEXT : S0UND7 ,255 

310  PUT  SPRITE  0,  (X,Y) ,10,0:ST=STRIG<1):IF  ST  <  >0THEN  GOSUB700 

315  SW=0:BEEP 

320  IFY=  > 154THEN3500 

325  IF  Y=< 3THEN  Y=3 

330  IFX=<3ORx=>230  iHENM=-n 

335  U=U-INT(RND<1>*15) 

340  IFNIOITHEN  PUT  SPRITE2,  <U-5,V)  ,9,1 
350  IFN201  THENPUT  SPRITE3,  (U-40,  V+30)  ,  7, 2 
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PROGRAMAS 


360  IF  N301THENPUT  SPRITE4,  (U-90,  V/+70)  ,6.3 
370  IF  N401THEN  PUT  SPRITE5,  (U- 150,  V+lIS)  ,  9, 4 
380  IFU=< 10  THEN  U=240 
384  IF  CO=5THEN390 

335  SU=N1+N2+N3+N4:  IF  SU=4THEN  N1=0:  N2=0:  N3=*0:  N4*0:  C0=C0+1 
390  P=POINT(X, Y+16) : P1=P0INT <X+ 16, Y+16) 

400  I FP= 1 1 ANDP 1  =  11 THEN I NTER V ALOFF : PL A Y - T200  5  XMU* ; ■ : FORK= 1 TO1000 : NEXT : GOTO 1000 
410  IFP=8  ORP 1 =8THEN3500 
420  GOTO250 

499  REM  Bifurcación  colisión' 

500  SPRITE  OFF 

510  IF  SW=0THENNV=NV-1ELSE  600 
515  PUT  SPRITE0, (0,240) . 10,0 
520  L I NE ( 1 90 , 1 7d ) - ( 254 , i 85 ) , 8 , BF 
530  COLORI : DRAW-BM190, 180" 

540  PRINT#1 ■ "ÑAUES" ; NU 
545  PUT  SPRÍTE6  (X  Y)  86 

550  I NTERVAL  OFÉ :  SÓUN¿>0 ,’  0 :  SOUND  1,5:  S0UND2 , 0 :  S0UND3.1 3 :  S0UND2 .255 :  S0UND5 ,15:  SOUND 
6,30: S0UND7 , 0 : S0UND8 ,16: S0UND9 ,16: SOUND 11,0: SOUND 12,5: SOUND 10,16: SOUND 13,0 
560  FOR  J=i  TO500 : NEXT : SOUND 12, 56: SOUND 1 3, 0:SOUND7, 255 

592  X=X-30: Y= 10 : U=240 

593  PUT  SPRITE6, (0,200 >,8,6 
595  SPRITE  ON: INTERVALON: RETURN 
600  PUT  SPRITE1, (0,230) , 10,5: S%=1 
602  PU=PU+10 

605  LINE( 185, 159) - (255,169) , 14.BF: DRAW " BM 1 95 , 1 60 " : PRI NT# 1 , ■ PTOS ■ 5 PU 

610  IFKX<50THENPUTSPRITE2, (0.220) ,6, l:Nl»l 

620  IFKX>50ANDKX< 90THENPUT  SPRITE3, (0. 200) , 7, 2: N2=l 

630  IFKX>90  ANDKX<125THENPUTSPRITE4, (0,220) ,6,3: N3=l 

640  IFKXU30  THENPUT  SPRITE5, (0, 240) , 9, 4: M4=l 

650  PUT  SPRITE6, (R.KX) . 10,6 

660  SOUND0, 0: SOUND 1 , 5: S0UND2, 0: S0UND3, 13: S0UND4, 255: S0UND5. 15: S0UND6, 30: SOUND7.0 

:S0UND8, 16: S0UND9, 16: SOUND10, 16: SOUND1 1 , 0: S0UND12, 5: SOUND13.0 

665  FORK=1TO150: NEXT: SOUND 12, 56: S0UMD13, 0: S0UND7, 255 

670  PUT  SPRITE6, (0,225) ,9,6 

675  SW= 1 

690  SPRITE  ON: INTERVALON: RETÜRN250 

699  REM  Subrutina  disparo 

700  S0UND3 ,217: S0UND6 , 5 : S0UND9 , 7 : S0UND7 , 5 : S0UND2 , 245 : SOUND 13,150 
710  SW=l:R=X+4:S=Y+20 

720  FORKX=STO  140  STEP5 
725  IF  SX=1  THEN250 
730  PUT  SPRITE1, (R,KX) , 10,5 
740  NEXT  KX 

750  PUT  SPRITE1, (260,200) , 10,5: S0UND7, 255 
760  RETURN 

1000  SCREEN0 : COLORI 5, 1, 1 : CLS 

1010  PLAY*T250O4DEFGDEFGEBED" : SPRITE  OFF 

1020  L0CATE5,5:PRINT"ERES  UN  AS" 

1030  L0CATE3, 15: PRINT"PULSA<S>PARA  SEGUIR* 

R  J=1  TO200: C0L0R15, 15: C0L0R15, 1 : BEEP: NEXT 

1 050  A*= I NKE Y* : I FA*= " *  THEN i 050 

1060  IFA*="S"THEN35 

1070  IFA*=*F"THEN  END 

1080  GOTO 1050 

1499  REM  Subrutina  tiempo-base 

1500  INTERVAL  OFF 

1505  W=INT(TIME/T) :X1=120-W:C=C+1 
1510  LINE ( 120, 175) - (XI , 185) , 1 , BF 
1520  H=RND(-TIME) 

1530  H1=INT(RND(1)*10+1) 

1540  £Ü;9<5THEN  LINE(Z, 164)-(Z+30,169> , 14, BF: LINE (Z+60, 164) - (Z+90, 169) , 14, BF: INTE 
RvAL  UN I RETURN 

1550  LINE (Z+60, 164) - (Z+90, 169) , 14, BF 
1560  LINE (Z, 164) - (Z+30, 169) , 11, BF 
1570  IF  C>10THENC=0 
1580  INTERVALON: RETURN 
1600  INTERVAL  OFF: SPRITEOFF 

GF#EO2DOlAGFnGÉ"0"  C0L0R8:  PRINT*1  *  JUEGO"  :  S0UND7 ,  248:  PL  A  Y  "  T 2000 1 DAGF  #E02D0 1 A 

1615  FOR  J=1  TO  2000: NEXT 
1620  SCREEN0: COLOR  15,4,1: CLS 

1630  L0CATE5, 5: PRINT’Si  quieres  seguir  pulsa<S>" 

1640  LOCATE  5, 10: PRINT"Si  quieres  acabar  pulsa  <F>" 

1650  A*=INKEYS:IF  A*=" "THEN 1650 
1 660  IF  A$="S"THEN  35 
1670  IF  A*= " F ” THEN  END  ELSE1650 
1800  SCREEN0: COLOR  15, 1,1: CLS 

1810  L0CATE2, 5: PRINT" □□□□□□oonaDoaooooaDonaoaaoooanooo" 

1812  L0CATE5, 7: PRINT" JUEGO  MSX  1.985" 

1815  L0CATE5, 10: PRINT"LAVA-M  Por  M. Berrocal" 

1320  FOR  J=i  TO  15: BEEP: NEXT 

1825  L0CATE5, 1 2: PRINT"Uti 1  i za  joistick-l" 

1830  FOR  J=1  TO  15: BEEP: NEXT 
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MSX 


1835 

1840 

1841 

1842 
1845 
1850 
1855 
2000 
2010 
2020 
2030 
2040 
2050 
2060 
2070 
2080 
2090 
2100 
2101 
2102 

2103 

2104 

2105 

2106 
2120 
2130 
2500 
2510 
2520 
2530 
2535 
2540 
2550 
2560 
2570 
2580 
2590 
2600 
2610 
2620 
2740 
2750 
2760 
2770 
2780 
2790 
2800 
2805 
2810 

2999 

3000 
3010 
3020 
3030 
3040 
3050 
3060 
3070 
3080 
3090 
3100 
3110 
3120 
3130 
3140 
3150 
3160 
3170 
3180 
3500 
3510 
3520 
3530 
3540 
3550 
3560 
3570 
3580 
3590 
3600 
3650 
3660 
3670 
3680 


LGCATE5, 14: PRINT" Destruye  las  naves  enemigas” 

L0CATE5, 16:PRINT”y  aterriza  en  la  plataforma" 

L0CATE5, 18: PRI NT” cu i dado  con  el  magnetismo" 

FOR  J=1T0  15:beep:next  ,  , 

L0CATE5, 20: PRI NT "Cu i  dado  no  caigas  en  la  lava" 

I  0CATE2, 25:  PRINT” 

FOR  J=1  TO  2000: NEXT:  RETURN 
REM  Subrutina  titulo 
SCREEN3: C0L0R8, 14,5: CLS 

open-grp:"  as# i 

DRAWBM  10,10" 

PR I NT# 1 , ” DESCENSO " 

DRAW-BM30, 40” 

PRINT#1  "EN  MAR" 

DRAW"BM25,80" 

PRINT#1  ”DE  LAVA" 

DRAW"BM10, 140" 

PRINT#1, "POR  M.B" 

S0UND7, 247: S0UND8,  15 

F0RK=1T05 

FORN=0TO31 

S0UND6, N : FOR J= 1 TO20 : NEXT 
NEXT: NEXT 

S0UND3 , 0: S0UND7, 255 
FOR  1=1  TO1000:NEXT 
PETURN 

REM  Subrutina  pantalla 
FOR  I=1T0131 
J=INT(RND(1)*256) 

PSET ( J  I)  15" NEXT 

S0UND7,’ 24¿:  PLAY ” ABCEFGABGEFBAGE03DA6F#E04D03AGF#E04D03" 

DR*= " E25R 1 5F20E40F 10R 10F20E25F30E25R36 " 

C0L0R14:  DRAWBM0,  160;  XDR*;  “ 

LINE (0.170) -(256, 170) ,14 

PAINT(30, 160) ,14 

LINE (0, 171) -(256. 171)  ,8 

PAINT(10, 175) ,8,14 

C I RCLE ( 40 , 40 ) , 15,2: PAINT ( 40, 40)  ,2 

CIRCLE (40, 40) ,20, 15, , , . 25 

C I RCLE ( 40,40 ) ,20, 15, , ,4 

LINE (10, 175) -(120, 185) ,3, BF 

C0L0R3 

DRAW"BM130, 180" 

PRINT#1 , "TIEMPO" 

LINE (2, 164) -(2+30, 169) , 1 1 , BF 
COLORI : DRAW-BM190, 180" 

PR I NT# 1 , " NAVES " ; NV 

COLORI: DRAW " BM 1 95 , 1 60 " : PR I NT# 1 , " PTOS " ; PU 
RETURN 

REM  Subrutina  lectura  sprites 
S P$= " " 

FOR  K=1  TO  L 

DCAT)  A 

SP*=SP$¡+CHR*(A> 

NEXTK 

RETURN 

DATA  129,65,35,23,15,11,13,11 

DATAIS, 15, 15,15, 15,31,62,252 

DATA  129, 130, 196,232,240,208, 176,208 

DATA  240, 240, 240,240,240,248, 124,63 

DATA  3,7,63,124,252,127,7,1 

DATA  1,7,127,255,127,63,7,3 

DATA  128, 192, 255, 124, 124,255,254,252 

DATA  252,254,255.252,252,255, 192, 128 

DATA  60, 102, 129, 129, 129,129, 102,60 

DATA  4, 18,8,34, 136,68, 17,36 

DATA  144,68,17,72,2,16,4,1 

DATA  160,0,148,32,138,0,84,1 

DATA  160,10,32,20,64,8,32,0 

REM  Subrutina  finalización 

INTERVAL  OFF : SPR I TEOFF 

L=31 

GOSUB3000 
SPRITE* (7) =SP* 

PUT  SPRI7E0, (250,2505 ,10,0 
PUT  SPRITE  7. (X, t ) ,8,7 

SOUND  3, 117: S0UND6, 1 I 5: S0UND9, 7: S0UND7, 0: S0UND2, 245: S0UND13, 10 

FOR  K=i  TO1000: NEXT: SOUND7, 255 

PUT  SPRITE  7, (250,250) ,8,7 

S0UND7, 243: NV=0: GCT0255 

DATA  144,1,65,115,51,59,63,63 

DATA63, 63, 63, 63, 127, 127,250,255 

DATA  145,128,140,156,188,124,120,243 

DATA252 , 552 , 254 , 254 , 255 , 255 , 255 , 255 
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JUEGO 
DEL  MES 


Eran  las  siete  de  la  tarde, 
el  sol  ya  regalaba  con  sus 
últimos  rayos,  cuando  la  indí¬ 
gena  que  te  mesaba  los  cabe¬ 
llos  te  acercó,  al  alcance  de 
la  mano,  la  bandeja  con  un 
exótico  y  exquisito  cocktel  y 
el  periódico  del  día. 

La  luz  del  atardecer  era 
tan  cálida,  tan  rojiza,  tan  té- 
nue  que  apenas  sí  pudiste  leer 
la  primera  página  del  diario. 
Seguramente  fue  el  suave 
murmullo  de  las  olas  al  rom¬ 
perse  en  la  orilla  junto  con 
las  caricias  de  Seohane,  los 
que,  en  complicidad  con  el 
dios  Morfeo  no  te  dejaron 
pasar  de  los  titulares  de  la 
portada.  La  noche  transcurrió 
como  todas  desde  que  llegaste 
a  esa  isla  de  la  zona  más  al 
Sur  del  caribe,  suave,  lenta, 
húmeda.,  muy  húmeda.  A  la 
mañana  siguiente,  apenas  po¬ 
días  abrir  los  ojos,  sólo  el 
cotidiano  baño  en  el  mar  sería 
capaz  de  despertarte;  con  un 
andar  pesado  y  lento,  te  acer- 
cáste  hasta  la  orilla  y  te  de¬ 
jaste  caer  al  agua. 

Con  la  toalla  que  te  había 
acercado  a  la  playa  Seohane, 
enrrolládo  en  el  cuello,  te 
sentaste  a  la  mesa  donde  un 


buen  desayuno  y  el  periódico 
del  día  espraban  impacientes 
que  los  devorases  como  cada 
mañana  de  los  últimos  dos 
meses. 


que  abrieras  el  diario  por  las 
páginas  de  anuncios  cuando 
sólo  te  faltaba  comerte  el  hue¬ 
vo,...  hoy  era  distinto,  hoy 
no  decía  aquello  de  «se  re- 


También  fue  casualidad 
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JUEGO 
DEL  MES 


compesará  a  quien  entregue 
broche  de  brillantes  perdido 
en  las  inmediaciones  del  ba¬ 
rrio  alto  de  la  ciudad  S/F 
33851»  que  significaba  que 
todo  iba  bien  y  que  no  eran 
necesarios  tus  conocimientos 
como  agente  del  servicio  de 
Inteligencia;  el  mensaje  de 
hoy  decía  «gracias  de  todo 
corazón  a  la  ciudad  en  que 
vivimos  y  en  particular  a  la 
generosa  persona  que  anóni¬ 
mamente  nos  devolvió  el  bro¬ 
che».  Sólo  tú  sabías  lo  que 
eso  significaba,  sólo  tú  sabías 
que  aquel  anuncio  era  para 
tí  el  final  de  unas  placenteras 
vacaciones  y  el  principio  de 
otra  de  tus  misiones... 

Aún  no  había  anochecido 
cuando  ya  estabas  identificán¬ 
dote  en  la  entrada  principal 
del  ministerio  de  tu  país,  ves¬ 


tido  con  tu  indumentaria  ha¬ 
bitual  demostrar  a  cualquiera 
que  tu  vida  era  casi  siempre 
una  fiesta. 

El  general  fue  tajante.  Esta 


vez  no  era  una  misión,  sino 
tres  y  además  encadenadas 
una  a  otra,...  en  la  primera 
de  ellas,  tendrás  que  entregar 
una  carta  en  la  base  secreta 
que  tenéis  instalada  en  los 
Alpes.  Para  llegar  tendrás 
que  esquiar  por  toda  la  ladera 
esquivando  los  abetos.  Las  te¬ 
clas  a  utilizar  en  todos  los 
casos  serán  los  cursores  y  en 
este  caso  en  particular,  los 
cursores  hacia  la  derecha  e 
izquierda.  En  nuestra  segun¬ 
da  misión  tenemos  que  acabar 
con  los  depósitos  de  gasolina 
tan  importantes  para  la  gue¬ 
rrilla  de  ese  país,  por  supues¬ 
to,  con  los  cursores  arriba  y 
abajo,  dispararás  en  esas  di¬ 
recciones.  Por  último,  tendrás 
que  alunizar  en  nuestro  pla¬ 
neta  satélite,  con  la  suficiente 
habilidad  como  para  no  estre¬ 
llarte  en  superficie. 

¡Buena  caza! 
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PROGRAMAS 


ESTRgrJ-^ 

/wortal 


Por  Germán  Salvador 


Este  es  un  programa  para  dos 
jugadores,  el  primer  jugador  lleva 
una  nave  amarilla  y  la  controla 
con  las  teclas  de  cursor,  el  segun¬ 
do  jugador  controla  una  nave  roja 
con  un  joystick,  éste  debe  ser 
enchufado  en  el  port  uno. 

El  objetivo  del  jugador  es  des¬ 
truir  la  nave  enemiga  con  ayuda 
de  unos  misiles  teledirigidos.  En 
el  centro  de  la  pantalla  hay  una 
estrella  cuyo  choque  es  mortal, 
esta  estrella  puede  tener  gravedad 
positiva  o  negativa,  la  gravedad 
esta  determinada  al  principio  del 
juego. 


io  •'*****#******* **** 

20  *  ESTRELLA  * 

30  '*  MORTAL  * 

40  ,'t  POR  S. S. S-C.  :« 

58  '  :**  ***#*' 

60  SCREEN  2  COLOR  15,1, 1CLS 
70  E$a“ br25u60r20dl2112dl2r6dl2l6dl2rl 
12129"  S*»"br25ul2r8ul218u36r26dl218dl 
8436120" : T$="br30u5015ul0r20di015d501i 
30  R*="br20u60rl5f5d20*5m+5,+3018M-3,- 
D 1 7  L  8  "  ••  L$*"br25u60rl0d45rl0dl512O"  •  A  $  = 
r25u55e5rl3-f5d5515m-5,  -20» -5 ,  +20 1 5 “ 

90  M$="u60r5m  +  5, +10M  +  5,  -10r5c!60 1 5u30» - 
+ 1 8  fti  - 5 , -18d33I5" : 0$= " br30h5u5 0® 5r 10*54 

95110“ 

180  FOR  h=0  T06STEP2 

110  PSET<8*A,85*A>,1 : »RAH"cllj  xt»;  x*S;  xt 
*;xr$;xe$;xlí;xl*;xa$;  " 

120  PSET(50+A,180+A>,ll:PRAW"xM$;xo$,xr$ 
;bl2;xtí;bl5;xa$;xl*;  “ 

130  NEXT  A 
140  CLEAR  200 

150  FOR  DE*1  T0  1200:NEXT  DE 
160  SCREEN0  •  CLS : KEV  OFF 

170  LOCATE  , 8 : PR I  NT " Gravedad < -3  «  »  03)? 

w 

180  LOCATE  22,3 

138  X$*INPUT$<i) : PRINTX*; 

280  XX*»INPUT*<1) : PRINT  XX* : X$»X$+XX* 

218  FOR  R»1  70  200 : NSXTR 
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PROGRAMAS 


220  8 R=VAL<X$) 

230  C0L0R15,4,1 
240  SCREEN  2,2,0 
250  0 P E N "  g r r> :  ''AS#1 

260  3<0)=2:X<0)=30:V<0)a30:S<l)=l.X<l)=2 
26 : V(1)=Í62 
270  SPRI7E  ON 

280  Sí<i>-CHRÍ<0)+CHRí<l)+CHRí<i>+CHPí(l 
>+CHRI<i)+CHRÍ<3>+CHRí <7)*CHRí <27) 

290  SS<2)=CHRí<127)+CHRí<7)+CHRí<3)+CHRí 
<l)+CHRí <1)+CKR«<1)+CHR*<1)+CHR$<0) 

360  3*<3>=CHRí <0)+CHRí<12S)+CHRí a23)+CH 

R$(128)+CHR$Ci28)+CHR$d92)+CHR$(224)  +  CH 
R  í  <  2  5  4  ) 

310  S$<4)»CHR$<254)+CHRÍ<192>+CHR$a28)  + 
CHR$(128)+CHR$(128)+CHRÍU28)+CHR$<0> 

320  SPRITEÍ <17)*Sí <1)+S*<2)+Sí <3>+SÍ<4> 
330  AÍ=CHRÍ <123 ) +CHRÍ < 64 ) +CHR í < 32 ) +CH R í < 
16)+CHRí  <8)+CHR$<4>+CHRÍ<2)-rCHRÍ  <1> 

340  BÍ*CHRÍ<1)+CHR$<2>+CHRÍ <4)+CHRÍ<8)*C 
HRí <16)+CHRí<32)+CHRí < 64 ) +CHR I (128 ) 

350  SPRITEÍ<13)*AÍ+BÍ+BS+AÍ 
360  ■'  arriba 

370  Al$sCHR$<24)+CHRÍ<24)+CHR*<24)+CHR$< 
90)+CHRí<90)+CHRÍ<90)+CHRí<126)+CHRí<98) 
380  SPR I TEí  < 1 ) =  A1$ 

390  '  abajo 

400  A2í»CHRI<90)+CHRí <126>+CHRí <90)+CHR$ 
<90)+CHRí <90)+CHRí  < 24  ) +CHRÍ < 24 ) *CHRí  (24) 
410  SPRITEÍ <2)=A2f 
420  '  darecha 

430  A3í«CHR$<0)+CHR$<248)+CHRí <64)+CHRf < 
255)+CHRí<255)+CHRí<64)+CHRí<248)+CHR$<0 

) 

440  SPRITEÍ <3)*A3í 
450  '  izquierda 

460  A4Í*CHRÍ<0>+CHRÍ<31)+CHR$<2)+CHRÍ<25 
5>+CHRí<255)+CHSí <2>+CHRí <31)+CHRÍ <0> 

470  SPRITEÍ <4)=A4Í 
480  '  a  r  r  -  d  a  r 

490  A5Í-CHRÍ <2)+CHRí <39)+CHRí<78)+CHRÍ <2 
20>+CHRí<56)+CHRí <114>+CHRí <236)+CHRí <72 

) 

500  SPR I TEÍ  <  5  )  = A5Í 
510'  abajo-dar 

520  A6$=CHRí<72)+CHRí<236)+CHRí<114)+CHR 
í <56>+CHRí <220)*CHRÍ <78>+CHRí <39)+CHRí <2 

) 

530  SPRITEí<6)*A6í 
540  '  abajo-izg 

550  A7Í=CHRÍ<13)+CHRÍ<55)+CHRÍ<73)+CHRÍ< 
28>+CHRÍ <59>+CHRí <114>+CHRí <228)+CHRí<64 

) 

560  SPR  I  TEí  <  7  )  = A7í 
570  arr-izg 

580  A8íaCHRí<64)fCHRí<223)+CHRí<114)+CHR 
í<59)+CHRí <28)+CHRí <78)+CHRí < 55 ) +CHRÍ < 18 
) 

590  SPRI  TEí <S)=A8í 

600  BiíaCHRí<6ó)+CHRí < 66 ) +CHRÍ < 66  ) +CHRÍ < 
66)  :  B2Í*CHRÍ<0)+CHRÍ<0)+CHR$ (0)+CHRÍ<0) 


610  SPRITEí<9)aBií+B2í:SPRITEí<18)aB2í+B 
1$ 

620  B3Í=CHRÍ<0)+CHRÍ<15)+B2Í+CHRÍ<15)+CH 
Rí  <  0 ) : B4íaCHRí<0>+CHRí <240>+B2f+CHRÍ<240 
)+CHRÍ<9> 

638  SPRITEÍ <11 )aB3í  :  SPR  I  TE*  <  12  )  *84í 
640  B5$=CHRÍ<S)+CHRÍ<16)+CHRÍ<32)+CHRÍ<1 
>+CHRí <2>+CHR$<4) dHRí <0>+CHRí <0> 

650  SPRITEÍ <13)»B5í 

660  B6íaCHRÍ<0)+CHRÍ<0)+CHRí<4)+CHRí<2)+ 
CHRÍ  <l)+CHRí  <32>+CHRí  <ló)+CHRí  <S) 

670  SPRITEÍ <14)=Bóí 

630  87$*CHRÍ <0)+CHRÍ <0)+CHRí <32)+CHR$(64 
)+CHRÍ<128)+CHRí<4)+CHRÍ<8)+CHRí<16> 

690  SPRITEÍ <15)=B7$ 

700  B3$=CHRí<ló)+CHRí<S)+CHRí<4)+CHRí<12 
8)+CHRÍ  <64)+CHR$<32)+CHRÍ  <0>*CHRÍ  <0.» 

710  SPR I TEÍ  < 16 ) =B3í 
720  F0R  QG=1  T0  80 

730  Q 1  =  I  N T  <  R  N  !•  <  1 )  í  2  5  6  >  + 1 :  02a I  NT < RNP< i )  *1 
92 )  +1 

740  PSET<Q1,Q2),15 
750  NEXT  GQ 

760  L  I NE  < 12 , 12) -  <  246 , 130)  ,  1,  B 

770  PA I NT< 1 , 1) , 1 

780  L INE< 14, 182) -<243,192) , 5, BF 

790  I>RAW"bml42,103;ci5;m-6,  -  i  i»  - 1 ,  -  6  ir¡  - 1 ,  + 

7»-6,+lr»  +  6,+l»  +  l,+6ra  +  l,  -  ó  »  +  6 ,  - 1 "  :  P  A I N  T  ( 1 

38,133), 15 

800  PUT  SPRITE7, (123,96) , 15, 17 
810  PUT  SPRITE0, <30  ,30), 11, 2 
820  PUT  SPRITEI, <226, 162) ,  8, 1 
838  G03UB  1740: 0OSUB1810 
840  FOR  N  =  0  TO  1 
850  SPR I  TE  ON 
360  D(N)»STICK(N) 

370  IF  D<N)a9  THEN  8OTO1120 

380  IF  MN)<>1  THEN  G0T0948 

890  IF  S  <  N ) =6  THEN  S < N )  =  3 : S0T01128 

900  IF  S  <  N ) =3  THEN  S < N ) =5 : 30T01128 

910  IF  S  <  N )  =  7  THEN  S < N ) =4 : SOTO1120 

920  IF  S  <  N ) =  4  THEN  S < N ) *3 : QOTQ1120 

930  S<N)=1:8OT0  1120 

940  IF  MN)<>3  THEN  GOTO  1000 

950  IF  S  <  N  )  =>  7  THEN  S<N)«2  :  GÜTQU20 

960  IF  S < N )  =  2  THEN  S < N ) =6 : G0T01128 

970  IF  S  <  N ) =  8  THEN  S < N ) «1 : GOTO1120 

980  IF  S  <  N ) = 1  THEN  S < N ) =5 : GOTO1120 

990  S<N)=3 : GOTO  1120 

1000  IF  P  <  N ) <  >  5  THEN  GOTO  1060 

1010  IF  3  <  N  )  =  5  THEN  S < N  )  *3 : GCTO1120 

1020  IF  3  <  N ) =  3  THEN  3 < N  )  *6 : GOTG1120 

1030  IF  S  <  N ) =  8  THEN  3 < N ) =4 : G0TC1123 

1040  IF  S  <  N  >  =4  THEN  S < N ) = 7 : 60 TO 1 120 

1050  S(N)*2 : GOTO  1120 

1060  IF  )(N)<>7  THEN  3OTO1120 

1070  IF  3  <  N ) =  5  THEN  S < N )  =  1 : GOTO1120 

1080  IF  S  < N ) =1  THEN  3 < N ) =8 : 80T01123 

1090  IF  S  <  N ) =  6  THEN  S < N ) «2 : 80 T01128 

1100  I F  S  <  N  )  =  2  THEN  3  <  N ) 3  7 ■ 8 0 T  0  1129 

1110  S  <  N  )  3  4 
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PROGRAMAS 


1123  IF  S < r * >  = 1  THEN  Y C N > 3 Y < N ) -5 . 2 : GOTO  1 

230 

1130  IF  S ( N) 3  3  THEN  X < N > 3X<  N >  +5 . 2  :  SO 70  1 
203 

1140  IF  S ( N ) =2  THEN  V < N ) 3 Y < N ) +5 . 2 : SOTO  i 
230 

1150  IF  S < M ) * 4  THEN  X < N ) 3X < N ) -5 . 2 : GOTO  1 
230 

1160  IF  S  <  N  >  *5  THEN  X  <  N  >  *X<  N  )  +  4  :  Y  <  N  )  3  Y  «.  N 
)  -4  :  GOTO  1230 

1170  IF  S  <  H  )  3  6  THEN  X C N ) 3X < N )  +  4  Y (. N ) 3 V ( N 
)  +4  :  GOTO  1230 

1180  IF  S  <  N ) 37  THEN  X < N > 3X ( N > -4 : Y < N > 3 V ( N 
)  +  4  :  GOTO  1200 

1190  IF  S<N>38  THEN  X  <  N  )»X<  N ) -4  :  Y  <  N)  «Y  (N 
>  -4 

1200  IF  XÍNX12  THEN  XCNX244 

1210  IF  X  <  N  >  >  2  4  4  THEN  X'<N>*12 

1220  IF  VÍNX12  THEN  Y(N>=130 

1230  IF  Y(N)>180  THEN  Y<N)=12 

1240  XX=X(N) : YY=Y(N> : GOSUB  1680 : X < N ) *X < N 

)+XX : Y<N)3V<N)+YY 

1250  PUT  SPRITENXXCN) ,  Y<N> )  »<H  AN&  N  =  0 
)  OR  < 3  AND  N  =  1),S(N> 

1260  ONSPRITE  GOSUB  1460 
1270  IF  WCN>«0  AND  3TRIGCN)*-1  THEN  HX< 
N)*X(N>  MY<N)*Y<N) :W<N)S1: GOSUB  1800 : GOS 
UB  1300 

1230  IF  WÜI)*1  THEN  G03UB  1300 
1290  NEXT  N ; GOTO  840 

1300  IT  S<N)»1  THEN  NY<N)*MY(N) -12  :  60T01 
380 

1310  IF  S  <  N ) 32  THEN  NY ( N ) *MY < N)  +  12 : 60T 01 
380 

1320  IF  S  <  N  >  =3  THEN  MX<N)=MX<N)+12:SOT01 
380 

1330  IF  S(N)=4  THEN  P1X < N )  =  MX ( N > -12  :  G0T01 
3S3 

1340  IF  S  <  N  >  3  5  THEN  MX  <  N  )  =t1X  (  N  X 12  :  M  Y  (  N  ) 
=MY(N> -12 : GOTO  1380 

1350  IF  S(N)=6  THEN  HX ( N ) =HX ( N ) +12 : M Y ( N > 

=  MY  <  N ) +12 : GOTO  1330 

1360  IF  S  <  N  )  3  7  THEN  MX ( N > 3MX < N > -12 • MY < N > 
=HY<N)+12 : GOTO  1330 

1370  IF  S ( N ) a8  THEN  MX < N ) 3MX ( N ) -12 : M Y < N > 

=  M  Y  <  N  )  -12 

1380  IF  MX  <  N  >  >244  THEN  MX<N)  =  12 
1390  IF  MXCNX12  THEN  MXCN)*244 
1400  IF  M  Y  <  N  .>  >133  THEN  MYCN)=12 
1410  IF  M  Y  <  N  X 1 2  THEN  MY(N)=138 
1420  PUT  SPRITE  N+2 X «X < N > , HY < H > > , 1 , S < N ) 
*■8 

1430  ON  SPRITE  GOSUB  1460 

1440  IF  ABS<X<N) -MX<N) )>100  OR  ABSCYCN)- 

M  Y  <  N  >  >  > 1 8  0  THEN  14<N)*0PUT  SPRITE  N  +  2,<“ 

1 0 , 1 0  > ,  0  ,  S  <  N  >  +  8  :  M  X  <  N  )  =  - 1 0  :  M  Y  (  N )  3 1 0 

1450  RETURH 

1460  SPRITE  OFF 

1470  IF  hBS < X ( 0 ) -MX ( 0 > ><=S  AND  ABSCYC0)- 
M  Y  <  8  >  X  3  8  THEN  EX3X < 0 ) : E Y  =  Y C 0 > : NX3 1 : GOTO 
1570  


A  PRIMERA  REVISTA  CON  CASSETTE  PARA  TECLEAR  Y  GRAB^P^ 


LISTADOS  PARA 


Rutina  de 

renumeración 

Matemáticas 

comerciaio^É 

Luna 


i ávegar 


^táilas 
uper  boxeo 


Policía  de  carretera 


Dosiser 


SPECTRUM 


AMSTRAD 


PROGRAMAS 


1480  IF  ftBS<SJ<0)-HX(l)><*8  AND  ABSCYC0)- 
HY  <  1 ) Xs8  THEN  ÉX=X<0> : EY»Y<0> : NX  =  1 : SOTO 
1570 

1490  IF  ABSCXCl) -MX  < 1 ) X*8  AND  ABS  (  Y  <  i  )  - 
HYC1)X  =  8  THEN  EX*X C 1 ) : E Y»Y < 1 ) : NX=2 : SOTO 
1570 

1500  IF  ABS  <  X  C 1 ) -MX ( 0  > X*8  AND  ABSCY(l) 
-MY<0))<=8  THEN  EX»X < 1 ) : EY= Y ( 1 ) : NX»2 : SO T 
O  1570 

1510  IF  ABS  <X<0)-X<1>)<»8  AND  ABSCY<0>- 
Y<1>><=8  THEN  EX*X<0)  :  EY  =  Y<1)  : NX*3 : SOTO 
1570 

1520  IF  ABSCX(0)-128X  =  16AND  ABS(Y<8>-96 
)<=>ló  THEN  EX*X<0>  :  EY=Y<0>  :  NX*1 :  SOTO  157 

0 

1530  IF  ABSCXCl) -128X*16AND  ABSCYCD-96 
) < a 1 6  THEN  EX»X<1> : EY=Y<1>  : NX»2 : GOTO  157 

0 

1540  IF  ABSC  CMXC0X4) -136X  =  13AND  ABS <  < M 
Y  C  0  >  +  4  >  -104X  =  13  THEN  EX  =  MX<0>  :EY*MY(0)  : 
NX»0  :  GOTO  1570 

1550  IF  ABS<  CMXCD+4) -136X*13AND  ABSCCM 
Y(l)  +  4) -104X*13  THEN  EX  =  HX ( 1 >  :  EY»MY <  1 )  : 
NX=0 : SOTO  1570 

1560  IF  AB3CMXC1) -  M  X  <  0 ) X  =  8  A  N  D  ABSCHYCl) 
-MY (0 >  X*8  THEN  NX  =  0  :  RETURN 
1570  SOSUB1740 

A  =  17 : B  =  18 : Cl*8  :  C2*1J 
60SUB  1810 
FOR  F»1  TO  150 
SI4AP  A  ,  B  :  SWAP  Ci,C2 
PUT  3PRITE4, <EX,EY),C1,A 
NEXT  F 

WC0)=0:WCl)*0:SC0>*2:XC0>*30:Y<e>*3 


X  C 1 ) *226 : YC1>*162 
A  =  8  TO  4:PUT  SPRI TEA, < -10, 10) ,  3 


0 : S<1)*1 : 

1650  FOR 
: NEXT  A 

1660  NX<0)»-10:MY(0X10:NX(1)«-18:MY(1)« 


1670  SOTO  840 

1680  '  CALCULO  DE  LA  GRAVEDAD 

169e  IF  XX=>123  THEN  XX*-GR:GOTO  1710 

1700  IF  XX<128  THEN  XX-GR 

1710  IF  YY=>96  THEN  YY* -GR : RETURN 

1720  IF  Y  Y  <  9  6  THEN  YY  =  SR 

1730  RETURN 

1740  IF  NX= 1  THEN  P2=P2+1 

1758  IF  NX*2  THEN  P1=P1+1 

1760  IF  N  X  =  3  THEN  P1*P1+1 : P2*P2  +  1 

1770  L  I N  E  C 1 4  , 182) -<243, 192) , 5 , BF 

1780  PRESET  Ció, 133) :  P  R  I  N  T  #  1 , "NAVE  1:";P1 

; TABC7) ; "NAVE  2:  ",P2 

1790  RETURN 

1800  50UND  Ó,3:S0UND  8,15:S0UN»  7.S.B1Í11 
0111:SOUND  8 , 16  :  S  O  U  N  D  13,0:SOUND  11,118- 
SGUND  12, 30: RETURN 

1310  SOUND  6 , 60 : SOUND  8,14:S0UHD  7,&B111 
10111:SOUND  8 , 16  - SOUND  13,0:SOUND  11,118 
:  SOUND  12, 50- RETURN 
1820  END 


PROGRAMAS: 


-□QTRADUCCIONGD-* : PRINT: PRINT 


palabras  en  (Dncl.5  o  (C)astella 


Cj~r  aducción 


100  CLS 
110  REM 

120  REM  *  JosC  Pablo  Pazos  * 

130  REM  *  ^TraducciOn^ wvm* 

150  KEY  OFF 

1Ó0  PRINT: PRINT: FRINT: PRINT: PRINT» 

170  PRINT" 

180  FOR  T=i  TO  1000: NEXT  T:CLS 
190  J=0 

195  PRINT  "  Las  respuestas  en  castellano  han  de  darse  con  letras  mayúsculas,  y 
las  inglesas  en  minúsculas.  " 

196  PRINT 

197  PRINT 

200  PRINT" íQuiere  ser  interrogado  sobre 
no7' : PRINT 
210  INPUTR* 

220  IF  R*<>"I"AND  R$<>"C"THEN  200 
230  PRINT"  -(Cuantas  palabras  le  pregunto?- 
240  INPUT  NM 
250  print:print:print 

260  IFNM>100THENPRINT-2A  que  se  aburre!" 

270  D=62 : REM  n 7  de  pares  de  palabras 
280  REM  bucle  principal 
290  FOR  M= 1  TO  NM 

300  I =RND ( -TIME ) : I=INT( <RND<1)*D> +1) 

310  FOR  L=1  TO  I 
320  READ  1$ 

330  READ  C* 

340  NEXT  L 

350  IF  R*="I"THEN  GOSUB  Ó80 
360  IF  R*="C"THEN  GOSUB  710 
370  RESTORE 

380  FOR  X=1  TO  250: NEXT  X 
390  CLS: PRINT: PRINT: PRINT 
400  RESTORE 

410  PRINT ■ 4cual  es  la  traduccirn  de:";P* 

420  INPUT  X$ 

430  IF  X*=Y$THEN  GOSUB  580 
440  IF  X$OY*THEN  GOSUB  610 
450  NEXT  M 

460  REM  -)HHf-Resu  1  tados-JHHt- 

470  PRINT "Vd .  tiene  ";J;"  aciertos  sobre  " ; NM; " 
preguntas" 

480  PRINT: PRINT : IF  J<= <NM/4> THENPRINT"  aaEstudie  m  s! 

, "DDDDD" 

490  IF  J> (NM/4) ANDJ<=(NM/2> THENPRINT"  MEDIANO  " : PLAY " L8AAAAA " 

500  IFJXNM/2)  ANDJ<=<  <  NM/4 )  *3)  THENPRINT  "  a  BUENO  !  " : PLAY"L16ABCCBAACBCBA" 

510  IFJX  (NM/4) *3) THENPRINT"  a 1 1 EXTRAORDINARIO  í  !  )  “ : PLAY " L64CDEFGABCGGGAAABB3 ■ 

520  PRINT:  PRINT:  PRINT"  {quiere  otra  partida  (SI/NO?" 

530  INPUT  Z% 

540  IF  2$= "SI" ORZ$= ■ 0 " THEN  190 

550  PRINT"Peor  para  Vd..... hasta  luego." 

560  END 

570  REM  ***Subprograma*** 

580  PRINT" justo. " 

590  J=J+1 
600  RETURN 

610  PRINT  "*f  al  so,  que  pena." 

620  PRINT : PRINT : PRINT "otra  respuesta:" 

630  PRINT" <cual  es  la  traduce  i Fn :"; P* 

640  INPUT  Z$ 

650  IF  Z*=Y’J»THENPRINT"exacto.  " 

660  IF  Z$< >Y*THENPRINT"*also.La  traduce! rn  es:"; Y* 

670  RETURN 
680  P$=I$ 

690  Y$=CS 
700  RETURN 
710  P$=C* 

720  Y*=I* 

730  RETURN 

740  DATA  everywhere, EN  TODAS  PARTES, 1 ove 1  y, BONITO, pi pe, PIPA, hat , SOMBRERO, t i e, COR 
BATA 

750  DATA  watch, RELOJ  DE  PULSERA, gl asses, GAFAS, umbrel 1 a, PARAGUAS, scar-f  , BUFANDA, ba 
q, BOLSO 

760  DATA  sweater , JERSEY , r i ng , SONAR , dar  1  i ng , QUERIDO , rea 1 1 y , REALMENTE , 1 i r ed , CANSAD 

770  DATA  agai n, OTRA  VEZ, never , NUNCA, al ways, SIEMPRE, the  same, LO  MISMO, don  * t  drink 
,N0  BEBAS 

780  DATA  don ’ t  shout,NO  GRITES, don’t  smoke,NO  FUMES, stand , QUEDATE, next  to, JUNTO 

7^0UDATAn?IatípLANO,f lashing, DESTELLANTE, I  don’t  know,NO  LO  SE, 1 ove, GUSTAR  MUCHO 

h&0  DATA  don’t  like,NO  GUSTAR, hate, ODIAR, year , A -0, stut -f i ng, RELLENO, listen, ESCUCH 
AR 

810  DATA  cooker, MUEBLE  DE  COCINA,  couple,  PAREJA,  a-fter,  DESPUES,  show,  MOSTRAR,  cuttin 
g, RECORTE 

820  DATA  quite, BASTANTE , i unny , GRAC I OSO , ne i ghbor s , VEC I NOS , usual  1 y , NORMALMENTE , 1 et 
1 5. i  i .PODEMOS. 


-:play-L4CCCcc", "bbbbb- 


.It’s  hot , HACE  CALOR 
860  DATA  ít’s  warm,E: 


NUBLADO 

ÉSTA  TEMPLADO, It’s  coid, HACE  FRIQ,It’s  foggy,HAY  NIEBLA 
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Programas 
Sony  MSX,  para  lo  que 
guste  ordenar. 


v  JUEGOS 


APLICACIONES 


HIT  BIT 


MSX 


^PROGRAMAS 


PROGRAMAS  SONY  MSX 


t 

Educativos 


•  Monkey  Academy 

•  Alfamat 
•Viaje  Espacial 

•  Multipuzzle 

•  Noria  de  Números 

•  Corro  de  Formas 
• Coconuts 

•  Yo  Calculo 

•  Selva  de  Letras 

•  El  Cubo 
Informático 

•  Electro-graf 

•  El  Rancho 

•  Teclas  Divertidas 

•  Boing  Boning 

•  Compulandia 

•  Mil  Caras 

•  Logo 

•  Países  Mundo-1 

•  Países  Mundo-2 

•  Tutor 

•  Computador 
Adivino 

•  Aprend.  Inglés-l 

•  Aprend.  lnglés-2 

•  Cosmos 

•  Curso  de  Básic 

•  Juego  de 
Números 


Juegos 

*  •  Antártic  Adventure 

•  Athletic  Land 

•  Sparkie 

é  •  Juno  First 

•  Car  Jamboree 

•  Battle  Cross 

•  Crazy  Train 

•  Mouser 

•  Computer  Billiards 

•  Alí  Babá 

•  Track  &  Field-I 

•  Track  &  Field-ll 

•  Dorodon 

•  Chess  (Ajedrez) 

•  Senjo 

•  E.l. 

•  Lode  Runner 

•  Super  Tennis 


•  Backgammon 

•  Super  Golf 

•  Hustler 

•  Binary  Land 

•  Dril  ler  Tanks 

•  Stop  the  Express 

•  Ninja 

•  Les  Flics 

•  La  Pulga 

•  The  Snowman 

•  Cubit 

•  Pack  16K 

•  Fútbol 

•  Kung  Fu 

•  Batalla  Tanques 

•  Mr.  Wong 

•  Xixolog 

•  Buggy 

•  Sweet  Acorn 

•  Peetan 

•  Jump  Coaster 
• Buggy  84 

•  3D  Water  Driver 

•  Pinky  Chase 

•  Wedding  Bells 

•  Fightting  Rider 

Aplicación 

•  Memoria  Ram  4  K 

•  Creative 
Greetings 

•  CharacterCollect 

•  Quinielas  y 
Reducciones 

•  Pascal 

•  Ensamblador 

•  Generador  Juegos 

Gestión _ 

•  Floja  de  Cálculo 

•  Flomewriter 

•  Control  Stocks 

•  Contabilidad 
Personal 

•  Ficheros 

•  Procesador 
de  Textos 

•  Control  Stocks 

•  Vencimientos 

•  Contabilidad 
1.500 


DERRI 

Este  juego  consiste  en  hacer 
desaparecer  el  mayor  número  de 
ladrillos  posible  intentando  llegar 
a  derribar  totalmente  la  pared  de 
colores  que  tienes  ante  tí.  Puedes 
elegir  entre  tres  niveles  de  dificul¬ 
tad  y  dentro  de  cada  partida  tienes 
5  bolas  para  destruir  el  total  de 
ladrillos,  teniendo  en  cuenta  que 
los  amarillos  valen  10  puntos  cada 
uno,  los  verdes  50  y  los  blancos 


100. 


Para  facilitar  el  golpe  a  la  pelota 
y  no  se  te  escape  ninguna  tu 
raquera  tiene  además  del  movi¬ 
miento  de  izquierda  a  derecha, 
un  pequeño  recorrido  hacia  arriba 
y  hacia  abajo. 


10  REM  OOOOOOOOOOOOOOOOOOOOOOOOOO 

20  REM  000  PROGRAMA  'DERRIBO"  000 

30  REM  000  LUIS  SANGUINO  <C)  MONSER  000 
40  REM  OOOOOOOOOOOOOOOOOOOOOOOOOO 

50  REM 

60  REM  OOOOOOOOOOOCOOOOOCOOOOOOOOOOOO 

70  REM  O  TITULO  Y  NIVEL  DE  DIFICULTAD  O 

80  REM  OOOOOOOOOOOOOOOOGOOOOOOOCOOOOO 

90  COLOR  1,7,13 

100  CLS: SCREEN  3 

110  OPEN'GRP: '  AS  #1 

120  PSET ( 20, 80) ,7 

130  PRINTttl,  'DERRIBO' 

140  FOR  1=1  TO  1200: NEXT 
150  CLS: SCREEN  1 

160  LOCATE  0, 10:PRINT'OOO  NIVEL  DE  DIFICULTAD  ***' 
170  LINE  INPUT'  00000  DE  4  A  6  00000  * ; B* 

180  A=VAL(BS) 

190  IF  A >6  OR  A< 4  THEN  BEEP: CLS: GOTO  160 

200  REM  OOOOOCOOOOOO 

210  REM  000000  PELOTA  000000 

220  REM  000000000000 

230  CLS:KEY  OFF: SCREEN  2,0 

240  DATA  00100 


PROGRAMAS 


W 


250 

260 

270 

280 

290 

300 

310 

320 

330 

340 

350 

360 

370 

330 


DATA 

DATA 

DATA 

DATA 

FOR 


01110 
11111 
01110 
00100 
1  =  1  TO 


READ  A* 

S*=S$+CHR$ ( VAL  < -  W3  ■ + A$ ) ) 

NEXT  I 

REM  OOOOOOOOOOO 

REM  0000000  PARED  0000000 
REM  OOOOOOOOOOO 

FOR  S=5  TO  255  STEP  10 
LINE ( S-4 , 0) - ( S+4 , 6 ) . 15, BF 
LINE (S-9, 8) - (S-l, 14) ,2,BF 


§ÜI 


410 

420 

430 

440 

450 

460 

470 

480 

490 

500 

510 

520 

530 

540 

550 

560 

570 

580 

590 

600 

610 

620 

630 

640 

650 

660 

670 

630 

690 

700 

710 

720 

730 

740 

750 

760 

770 

780 

790 

800 

810 

820 

830 

840 

350 

860 

870 

880 

890 

900 

910 

920 

930 

940 

950 

960 

970 

980 

990 

1000 

1010 


430 


mw' 


480 

620 


390  LINE(S-4, 16) -(S+4, 22)  ,  i  1 ,  BF 
400  NEXT 

REM  0000000000000000000000000 
REM  00  MOVIMIENTO  DE  LA  PELOTA  00 
REM  0000000000000000000000000 
2=186: J=130 
N=RND ( -TIME) 

XI=A *  Y I =A 

X1=IÑT (RND < 1 ) *250+1 ) : Yl=30 
X=Xi+XI 
Y=Y 1 +YI 

IF  X >255  OR  X<0  THEN  BEEP: XI=-XI : GOTO 
IF  Y< 0  THEN  YI=- YI : GOTO  480 
IF  Y >192  THEN  840 

SPRITE*U)=S*  W" 

PUT  3PRITE  0, (Xl-5, Yl) , 1,1 
REM  OQCGOOOOOOOOOOOOOOOOOOO 

REM  000  CONDICIONES  DE  CHOQUE  000 

REM  OOOOOOOOOOOOOOOOOOOOOOO  _  

IF  POINT  < X 1 - 1 , Y ) =6  OR  POINT (XI + 1, Y ) =6  THEN  BEEP: YI=-YI : GOTO 
IF  POINT  (Xl-i . Yi+2) =15  OR  POINT ( XI + 1 , Yl +2 > =15  THEN  600  ELSE 

bIeP:  T=T+100?LINe1ÍXS*-4, 0)  -  (XS  +  4,  ó)  ,7,BF:  IF  V I < 0  THEN  Y 1 =- Y I S  GOT° 

IF  POINT (Xl-1 , Yl+2) =11  OR  POINT (Xl+1 , Yl+2) =1 1  THEN  630  ELSE  650 

BEEP: T=T+ 10: ^LINE^XS-4,  16)  -(XS+4,22)  ,7.BF:  «  c}ZcYl\a°T° 

IF  POINT  (Xl-1 , Yl+2) =2  OR  POINT (XI +1 , Yl +2) =2  THEN  660  ELSE  710 

BEEP: T=f +50t5LINE(XS-4, 8) -(XS+4, 14) ,7,BF: IFYI<0  THEN  YI=-YI:GOTO  490 
REM  00000000000000000000000000 
REM  00  MOVIMIENTO  DE  LA  RAQUETA  00 
REM  OGOOOOOOOOOOOOOOOOOOOOOOOO 
D=STICK (0) 

IF  D=3  THEN  J=J+4: LINE ( J-12, Z-3) - ( J-8, Z+3) , 7, BF 
D=7  THEN  J=J-4: LINE (J+8,2-3) - ( J+12, Z+3) , 7, BF 
D=1  THEN  Z=Z“ó: LINE (J-8,Z+9) -(J+8,Z+3) ,7, BF  «H 

Z<  =  168  THEN  Z=168  _ _  |M 

D=5  THEN  Z=Z+ó:LINE( J-8,Z-9) -(J+8,Z-3) ,7,BF  « 

Z  >  =  1 86  THEN  2=186 
J< 3  THEN  J=8 
J  >247  THEN  J=247 
LINE(J-8,Z-3)-(J+8,Z+3) ,6,BF 
X1=X: Y1=Y 
GOTO  480 
YI=-YI : GOTO  490 
H=H+  1 

IF  H>4  THEN  920 
LINE (0. Z-3) - ( 255, Z+3) , 7, BF 
FOR  1=1  TO  25: BEEP: NEXT  I 
440 


490 


490 


IF 

IF 

IF 

IF 

IF 

IF 

IF 


¡m 


# 


GOTO  .  ... 

REM  00000000000000000000000000 
REM  00  MARCADOR  Y  FIN  DEL  JUEGO  00 
REM  00000000000000000000000000 

LOCATE  0, Í0:PRINT“OOOO  FIN  DE  LA  PARTIDA  OOOO" 
PRINT : PRI NT *0000000  PUNTOS=*;T; *0000000" 


PR I NT :PRI NT "QUIERES 
A*=INKEYS¡ 

IF  A*=*S"  OR  A$=‘s" 
IF  A$=*N"  OR  A*="n" 
GOTO  960 
FOR  1=1  TO  255 
PRINTI;CHR*(I) 5 ’  " 


JUGAR  OTRA  VEZ  S/N? 

THEN  H=0:CLEAR*.GOTO 
THEN  CLSIEND 


150 


1020  NEXT  I 
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QUEREMOS 
VER  TUS 
PROGRAMAS 
BASIC: 
SPECTRUM, 
C64,  MSX  Y 
AMSTRAD 

Sabemos  que  eres  lo  sufi¬ 
cientemente  ingenioso  para 
no  necesitar  copiarlos  de  na¬ 
die.  Mándanos  una  cinta  de 
cassette  con  tu  programa,  y  a 


ser  posible,  un  listado  del 
mismo. 

Premiamos  con  5.000  pts. 
y  un  ejemplar  de  la  revista  en 
cuestión,  cada  programa  que 
publiquemos  en  cualquiera 
de  nuestras  cinco  publicacio¬ 
nes. 

Envíanos  el  tuyo,  cuanto 
antes  lo  hagas,  más  posibili¬ 
dades  tendrás  de  verlo  publi¬ 
cado. 

MONSER,  S.  A. 

C/ ARGOS,  9 
28037  MADRID 

Deprisa,  Deprisa... 


Intercambio  o  ven  ^etcia- 

masMsX«0^  7osse0..  Z.AX- 

les).  E""en°sTBÚSTERS,MA- 

^ósé  Marta 

CMmcta) 


intercambiar 

DeSe  Jñ  general  de 

programas  en  g 

S'BosqneUoan 

C /  Barcelona, 

Tremp 


PREGONERO 


Fe  de  erratas 

A  continuación  os  damos  listadas  las  líneas  que  faltaban, 

wssriirs  ?•  í  rtaaMr"* 0  * 

'^Además  para  el  programa  Chopper,  insertaremos  las  lineas 
200  y  205  del  listado  2. 

LI^V  for  i  *  68888'  to  68217'  :  REAO  o  *  !i  J  '  NEXT 

DATA  219,  170,  238,  248,  33,  92,  234,  94,  246,  8, 
f)  0  ^  ^  fj  0^  0 ^  j ^  ^  211,  170,  / 1  /  f 

169,  71,  8,  8,  «i  «.  ®t  *•  ® 

DATA  8,  8,  8,  238,  128,  194,  151,  234,  283,  91, 

282,  151,  234,  62,  3,  58,  94,  234,  195,  289,  234, 
128,  238,  64,  194,  178,  234,  283,  83,  282,  178, 

DATA  5e’,  94,  234,  195,  289,  234,  128,  238,  J94' 

189,  234,  283,  67,  282,  189,  234,  62,  8,  58,  94, 
234,  195,  289,  234,  128,  238,  16,  194,  288,  23  , 

283,  75,  282,  288,  234,  62,  1,  58,  94,  234,  195, 

28?,  234,  281,  62,  8,  58,  93,  234,  58  - 

DATA  93,  234,  283,  39,  283,  3?,  79,  6,  8,  33,  8, 

27,  9,  58,  95,  234,  71,  58,  94,  234,  87, J54'  fl' 
194,  258,  234,  285,  27,  235,  121,  152,  79,  195, 

ÍÍta”!’i”!  ?35,  35,  285,  27,  ”5' ’  ,95.1 

754  2  194,  20,  235,  205,  27,  235,  121,  J28, 

235 ;  3?;  285;  27, 235, 195,  m,  235, 

125,  243,  21 1 

DATA  153,  124,  211  ,  153,  8,  8,  8,  -J  J1’’ 

183,  251,  281,  125,  243,  211,  153,  124,  246,  64, 
211,  153,  121,  211,  152,  251,  201 


1010 


1020 


1030 


1040 


1050 


LISTADO  2 

=•’  ;\t: - ■  6°t° »» 


DRrJ*  I  *  BOTO  215 


CLUB  DE  USUARIOS  MONSER 

Si  ya  tienes  tu  ordenador  (SPECTRUM,  MSX,  C-64)  y  deseas 
estar  periódicamente  informado  de  los  nuevos  programas  y 
periféricos,  así  como  recibir  todas  las  ofertas  de  software  y 
hardware  que,  con  frecuencia  hacemos  especialmente  para 
nuestros  socios,  inscríbete  hoy  mismo  sin  ningún  gasto,  ni 
compromiso  por  tu  parte. 

Enviar  el  cupón  a: 

CLUB  DE  USUARIOS  MONSER 
Calle  Argos,  9.  28037-MADRID 


Deseo  inscribirme  en  el  CLUB  DE  USUARIOS 
MONSER  sin  ningún  gasto,  ni  compromiso,  para  re¬ 
cibir  información  y  tener  acceso  a  los  descuentos  y 
ofertas  especiales  del  Club. 


Nombre . 

Dirección . Teléfono 

Ciudad . C.P . Provincia . 


Edad . Profesión 

Marca  del  ordenador . 


MSX 


. Fecha  compra 

FIRMA 

FECHA 


Envía  inmediatamente  el  cupón  y  recibirás  en  breve  un  keypanel  de  n 
galo  para  personalizar  tus  programas. 
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BW 


¿Conocéis  el  famoso  juego 
del  badgamon?  ¿no?,  seguro 
que  nunca  os  atrevisteis  a  inten¬ 
tarlo  inducidos  a  creer  que  es 
un  juego  demasiado  difícil,  o 
quiza  demasiado  exótico,  ó 
quien  sabe  cuantas  cosas  más. 
Pues  bien,  con  este  programa 
ha  llegado  el  momento  de  que 
nos  sacudamos  todos  esos  tontos 
perjuicios  de  encima,  pues  ava¬ 
lado  por  la  firma  que  lo  distri¬ 
buye  nos  llega  una  forma  fácil 
de  aprender  a  jugar  a  este  lla¬ 
mado  «juego  de  los  faraones». 
Además,  no  solo  se  puede 
aprender  a  jugar,  sino  que 
acompañado  de  unos  soberbios 
gráficos  que  nos  representan  en 
todo  momento  uno  de  los  me¬ 
jores  tableros  que  hallamos  visto 
y  aportando  además  continua¬ 
mente  información  sobre  la  si¬ 
tuación  de  la  partida,  nos  ofrece 
un  adversario  (el  ordenador), 
realmente  difícil  de  vencer,  por 
no  decir  imposible. 

Elije  sistema  de  juego,  elije 
nivel  de  juego,  elije  color  de 
las  fichas  y  disponte  a  jugar  ó 
aprender  con  uno  de  los  juegos 
de  mesa  mejor  realizados  que 
hemos  visto  nunca.  El  tablero 
es  real,  las  fichas  auténticas,  los 
dados  geniales  y  al  tratamiento 
general  de  la  pantalla,  como  la 
distribución,  el  color,  etc...  se 
le  puede  muy  calificar  de  «Tra¬ 
bajo  de  profesionales». 
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D 


arece  que  por  fin  alguién 
se  ha  decidido  a  hacer 
algo  nuevo  en  MSX.  Cuando  parecía  que  todas  las 
firmas  implicadas  en  el  standar,  solo  miraban  hacia  la 
frontera  de  las  ampliaciones  de  memoria,  la  casa  Pioneer 
se  lanza  al  vacio  con  un  nuevo  micro  que  muy  bien 
podía  llamarse  «una  innovación»,  y  que  estamos  seguros 
que  revolucionará  el  mercado,  ya  casi  saturado  del  or¬ 
denador  doméstico,  es  decir,  el  ordenador  lúdico.  Sólo 
con  ver  al  nuevo  PX-7,  ya  nos  damos  cuenta  de  que 
estamos  frente  a  algo  totalmente  nuevo,  algo  realmente 


La  caja  que  aloja  la  unidad  de 
proceso  (CPU,  Central  Procesing 
Unit),  contiene  además,  como  ya 
decíamos  antes  toda  la  circuitería 
propia  del  sistema,  es  decir,  la 
memoria  RAM  o  memoria  de  usua¬ 
rio  (por  ser  la  única  que  se  puede 
grabar  y  borrar),  la  ROM,  con  el 
MSX-Basic  y  el  P-Basic,  que  es 
en  si  otra  innovación  en  el  standar, 
por  ser  una  creación  exclusiva  de 
la  firma  Pioneer  que  viene  a  refor¬ 
zar  el  Basic  de  la  Microsoft  (MSX); 


distinto.  El  micro  en  cuestión  viene  en  dos  unidades,  o 
mejor  dicho,  en  una  la  unidad  de  proceso  (CPU),  con 
toda  su  circuitería  y  por  otro  lado  tenemos  el  teclado, 
que  gracias  a  esto  es  de  un  diseño  elegante  y  de 
estructura  fina,  discreta  y  cómoda,  muy  cómoda. 
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Tableta  Gráfica 


como  decíamos  antes,  la  caja  que 
aloja  todo  esto,  es  metálica  y  de 
color  negro,  al  Igual  que  la  del 
teclado,  ofreciendo  a  la  vista  un 
conjunto  fino  y  elegante;  esta  caja 
es  realmente  importante  no  solo 
por  lo  que  en  su  interior  esconde, 
sino  de  igual  manera,  por  todo 
con  lo  que  la  Pioneer  le  ha  dotado 
en  su  exterior,  es  decir,  de  izquiera 
a  derecha  nos  podemos  encontrar 
con:  botón  de  encendido  (ON/ 
OFF),  conector  para  el  teclado  (no 
olvidemos  que  va  independiente), 
conectores  para  audio  y  para  vi¬ 
deo  (características  del  standard), 
dos  puertos  para  Joystick,  cone¬ 
xión  para  audífonos,  control  para 
mezclas  (otra  innovación  en  el  sis¬ 
tema),  control  de  sonido,  botón 
de  reset  y  un  slot  para  cartuchos 
(como  mandan  los  cánones).  A 
ambos  lados  de  la  caja  encontra¬ 
mos  dos  altavoces,  que  se  podrán 
utilizar  conjuntamente  con  unida¬ 
des  interactivas  de  video. 

Por  la  parte  trasera  encontramos 
interfaces  para  AudioA/ideo  (por 
cierto,  el  de  audio,  es  stero),  que 
son  de  dos  direcciones,  es  decir 
no  solo  de  salida,  sino  también 
de  entrada,  lo  que  nos  va  dando 
una  ¡dea  de  la  meta  de  Pioneer 
cuando  fabricó  o  al  menos  diseño 
la  maquinita,  estaba  preparando 
la  máquina  de  imagen  por  excelen¬ 


cia  (ya  lo  comprobaremos  más 
adelante),  de  la  misma  manera  te¬ 
nemos  ajustes  de  canal,  salidas 
RF  y  RGB,  conector  para  repro¬ 
ductor  de  Laser-Disk  (¡oh!  ¡la!  ¡la!), 
conexión  para  cassette,  otro  puer¬ 
to  o  slot  para  cartuchos  y  el  ya 
clásico  conector  de  impresora  pa¬ 
ralelo.  Nos  agradó  sobremanera 
la  ubicación  de  las  conexiones 
para  los  Joystick,  que  es  en  la 
parte  delantera,  siendo  de  muy 
fácil  acceso,  pudiendo  además  uti¬ 
lizar  sin  la  conexión  del  teclado, 
osea  que  para  jugar  podríamos 
prescindir  prefectamente  del  mis¬ 
mo,  conectando  los  joystick  a  sus 
puertos  respectivos  y  el  cartucho 
en  el  slot  al  efecto  ubicado  en  la 
misma  caja  de  la  unidad  central. 

Sobre  el  teclado  también  tene¬ 
mos  mucho  que  decir,  puesto  que 
se  trata  de  los  que  podríamos 
bautizar  como  una  versión  mejora¬ 
da  al  standard  MSX,  conectándose 
a  la  unidad  principal  mediante  un 
enchufe  de  3  pins  norma  DIN  y 
un  cable  de  mediana  longitud,  su¬ 
ficiente  como  para  poder  cambiar 
el  sitio  lógico  del  mismo  y  colocar¬ 
lo  sobre  las  piernas  por  ejemplo, 
para  un  más  cómodo  uso.  La  caja 
en  la  que  se  ubica,  como  ya  de¬ 
cíamos  antes  es  metálica,  de  color 
negro  y  muy  buena  presencia,  con 
un  toque  de  discreta  elegancia. 


La  distribución  de  las  teclas  es 
bastante  similar  a  todos  los  MSX, 
con  las  de  función  en  la  parte 
superior  derecha  y  la  clásicas  de 
CLS/HOME/INS/DEL  están  a  la 
derecha,  sobre  los  cursores. 

Con  respecto  a  los  colores  de 
las  teclas,  podemos  decir  que  es 
tan  elegante  como  la  caja,  tan 
original  como  el  mismo  tan  profe¬ 
sional  con  el  que  más.  Con  las 
teclas  de  color  negro  con  la  impre¬ 
sión  en  bajo  relieve  blanco;  las 
teclas  de  función  están  marcadas 
con  una  tira  de  color  violeta  suave. 
Pero  el  color  no  es  la  única  dife¬ 
rencia  que  encontraremos  en  el 
teclado  del  PX-7,  sino  que  además 
disponemos  de  tres  nuevas  teclas 
no  conocidas  hasta  ahora  en  nin¬ 
gún  equipo  del  Standard,  dentro 
de  las  teclas  de  función.  Situadas 
a  la  izquierda  conocidas  ESC,  TAB 
y  CTRL  encontraremos  las  teclas 
SUPERIMPOSE,  VIDEO  Y  COM¬ 
PUTER  que  más  adelante  veremos 
con  más  detenimiento. 

El  tacto  de  las  teclas  es  suave 
y  seguro,  firme  dándonos  la  impre¬ 
sión  de  estar  sentados  ante  una 
máquina  de  otro  tipo,  mucho  más 
cara  y  más  «profesional»  (notaréis 
que  lo  de  más  profesional,  lo  estoy 
empezando  a  escribir  entre  comi¬ 
llas). 
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Conectores  y  más  conectores 


Análisis 

Hardware 


Unidad  de  disco  Láser 


En  resumen,  eremos  que  este 
es  un  teclado  muy  apropiado,  por 
su  calidad,  para  trabajar  con  pro¬ 
cesadores  de  textos  y  cualquier 
otro  programa  que  requiera  el  uso 
intenso  del  teclado. 

Por  increíble  que  parezca,  al  pa¬ 
lacio  que  han  construido  se  les 
olvidó  ponerle  puerta  de  entrada, 
esto  es,  el  Pioneer  PX-7  solo  dis¬ 
pone  de  32  K  de  RAM,  y  aunque 
la  ROMsea  de  40  K,  (8K  para  el 
P-Basic  y  32  para  el  Basic  MSX), 
esto  no  justifica  un  «error»  de  esta 
magnitud.  Como  contrapartida  el 
usuario  de  Basic,  sigue  disponien¬ 
do  de  las  28  K  que  ofrece  cual¬ 
quier  sistema  de  los  64  K,  el  pro¬ 
blema  se  evidencia  cuando  inten¬ 
tamos  utilizar  cualquier  programa 
comercial  que  ocupe  más  memoria 
que  esta,  por  supuesto  en  código 
máquina.  De  cualquier  manera  la 
firma  Pioneer  ya  comercializa  una 
expansión  de  memoria  hasta  la 
64  K. 

Al  principio  hablábamos  de  que 
el  PX-7  incorporaba  una  extensión 
del  Basic  MSX,  denominada  P-Ba¬ 
sic,  y  que  no  se  trataba  de  un 
nuevo  Basic,  sino  de  una  expansión 
de  apoyo  al  Basic  standard,  que 
incorporaba  sentencias  que  nos 
permitirían  aprovechar  al  máximo 
las  nuevas  facilidades  que  incor¬ 
pora  el  sistema  comercializado  por 


la  firma  Pioneer,  que  son  la  posi¬ 
bilidad  de  superposición  de  sonido 
e  imagen  de  video,  generador  de 
sonido  stereo  y  por  último,  la  uti¬ 
lización  de  un  sistema  de  disco 
láser,  lo  que  amplia  hasta  lo  inde¬ 
cible  las  posibilidades  del  PX-7, 
si  bien  para  utilizar  estas  opciones 
no  nos  bastará  con  saber  utilizar 
los  comandos  correctamente  sino 
que  serán  necesarias  también  una 
muy  nutridas  inversiones  en  peri¬ 
féricos  no  aptos  para  quien  desea 
una  máquina  mata-marcianos, 
como  son  el  grabador/reproductor 
de  Laser-Disck,  la  tableta  gráfica, 
etc... 

Para  utilizar  la  máquina  se  nos 
ofrezcen  en  pantalla  las  dos  opcio¬ 
nes:  Basic  MSX  y  P-Basic,  selec¬ 
cionando  la  que  en  ese  momento 
consideremos  más  necesaria.  De 
cualquier  manera,  podremos  utili¬ 
zar  el  P-Basic  desde  el  Basic  MSX 
con  solo  anteponer  al  mandato 
deseado  la  palabra  clave  CALL, 
pero  el  micro  dispone  de  su  ma¬ 
nual  detallado  con  el  que  seguro 
que  no  se  nos  presentará  ninguna 
pega. 

Como  tantas  firmas  prometían, 
el  micro  no  es  sino  el  centro  de 
un  gran  sistema  y  esto  cobra  es¬ 
pecial  valor  en  el  caso  del  Pioneer, 
que  obliga  a  realizar  una  inversión 
inesperada  si  queremos  disfrutar 


de  algo  realmente  nuevo.  El  PX-7 
es  solo  el  núcleo  del  sistema,  de¬ 
pendiendo  de  Vd.  el  expandirlo 
hasta  que  cubra  sus  necesidades. 
Podemos  empezar  por  comprar  el 
reproductor  de  Laser-Disck,  que 
en  Inglaterra  ya  alcanza  el  precio 
de  500  libras  y  que  es  especial¬ 
mente  útil  en  todo  trabajo  que 
necesite  un  tratamiento  interactivo 
de  información  contenida  en  el 
mismo  se  podrá  recuperar  por  ac¬ 
ceso  directo).  Uno  de  los  más 
importantes  motivos  que  aseguran 
el  éxito  de  este  dispositivo  son 
sus  prestaciones  en  lo  que  a  ima¬ 
gen  se  refiere,  pudiendo  adelantar 
o  atrasar  la  imagen,  pararla,  hacer 
cámara  lenta  o  reproducir  cual¬ 
quier  imagen  o  pantallazo  con  tan 
tan  solo  llamarlo  vía  ordenador  y 
en  un  tiempo  de  acceso  realmente 
rápido  (casi  instantáneo).  Por  si 
esto  no  fuera  suficiente,  podremos 
sobreimponer  imágenes  creadas 
por  nosotros  mismos  formando 
secuencias  móviles. 

Por  último  diremos  que  no  cree¬ 
mos  necesario  ser  un  fanático  de 
los  ordenadores  para  adquirir  un 
sistema  completo  Pioneer,  pero  al 
menos  si  hay  que  tener  una  eco¬ 
nomía  de  lo  más  saneada. 

Este  es  un  gran  sistema.  ¡¡Enho¬ 
rabuena!! 
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TOüñ  DE  FññílCE 


ACT I  VISIONi 


[W\KI 


Juego  en  el  que  puedes  crear  a  tu  pro¬ 
pio  boxeador.  Elige  su  raza,  estilo  físi¬ 
co  e  imagen.  Entrénale  y  demuestra 
sus  habilidades.  _  _ . 


TRUNKIE,  el  hombre  elefante  y  tu  su¬ 
peráis  las  trampas  y  lográis  encontrar 
a  GREGOGO,  el  Gran  Dios  de  Oro. 


Elige  la  superficie  de  la  pista  y  el  opo¬ 
nente  y  demuestra  tu  control  de  la  ra¬ 
queta  jugando  a  dobles  o  individual. 

C.S.A. 


Entra  en  el  mundo  ciclista  a  través  de 
las  16  etapas  del  Tour.  Con  acompa¬ 
ñamiento  musical  y  el  jersey  amarillo 
esperando  al  ganador. 


ACTI  VISION 


HOME  COMPUTER  SOFTWARE 


1ACTI  VISION] 

.  ■  i 


ACTI  VISION! 

íik)Mi.a)Mrim.K^M  ivvarlI 


|  HPM K  Cl ~>M  PUT ER  SOFTWARE 


Al  volante  de  tu  coche  atraviesas  25 
ciudades.  Seleccionas  la  ruta,  manio¬ 
bras  a  través  del  tráfico...  Todo  un 
reto  de  conducción  automo¬ 
vilística.  C.A. 


Recorre  un  planeta  en  tres  dimensio¬ 
nes  a  la  búsqueda  detuscompañeros, 
mientras  el  enemigo  te  persigue. 


Nunca  fue  Aladino  tan  generosamente 
premiado  por  los  genios. 

Vuele  sobre  una  increíble  alfombra 
mágica  en  tres  dimensiones. 

C.A.M. 


Compleja  aventura  donde  los  jugado¬ 
res  deben  buscar  a  través  de  las  dife¬ 
rentes  pistas  y  problemas  como  re¬ 
solver  el  misterio. 

C.S.A. 


AcTMüoh 


leonFnctalus! 


The  Qreat  American  Cross-Country 


LUCASF1LM  GAMES 


You’ve  found  your  way  in. 
But  is  there  a  way  out? 


^  masfeH 
apfhe  lampa 


y  sus  clásicos:  GHOSTBUSTER.  DECATHLON  DE  ACTIVISION.^^RIVER  RAID 


PITFALL  2  4®  y  otros  títulos  más  a  1.540r  P. V.P  |  •  SPACE  SHUTTLE. 


DESIGNER  PENCIL. 


Disponibles  para: 

COMMODORE  C 
SPECTRUM  S 
AMSTRAD  A 
MSX  M 


EN  TIENDAS  ESPECIALIZADAS  Y  GRANDES  ALMACENES 

O  DIRECTAMENTE  distribuido  por: 

POR  CORREO  O  TELEFONO  A: 

Argos,  .9  -  28037  MADRID 

Teléfs.  91/742  72  12/96 


E-]  MONSER, 


S.  A. 


